>IF _Screen.FormCount > 0 > lnFormCount = _Screen.FormCount > DO WHILE lnFormCount > 0 > IF !INLIST(UPPER(_Screen.Forms(lnFormCount).Name),"MAINTOOLBAR","CHECKINGTOOLBAR","SAVINGSTOOLBAR","CREDITTOOLBAR","LOANTOOLBAR","QUICKBAR") > _Screen.Forms(lnFormCount).Release() > ENDIF > lnFormCount = lnFormCount - 1 > IF lnFormCount > _Screen.FormCount > lnFormCount = _Screen.FormCount > ENDIF > ENDDO >ENDIF >Super!! I will test this out and see how it work with our code!