The contents of my VFP9 startup program at work:

_VFP.Caption = VERSION(1)
DO CASE
CASE VERSION(5)=700
_screen.picture="f:\dev\vfp7picture.bmp"
CASE VERSION(5)=800
_screen.picture="f:\dev\vfp8picture.bmp"
CASE VERSION(5)=900
_screen.picture="f:\dev\vfp9picture.bmp"
ENDCASE
IF VARTYPE(_oFoxCodeTips) = "O"
_oFoxCodeTips.Dockable = 1
ENDIF
IF VARTYPE(_oTaskPane) = "O"
_oTaskPane.dockable = 1
ENDIF
IF VARTYPE(_oToolBox) = "O"
_otoolbox.dockable = 1
ENDIF
IF VARTYPE(m._otasklist)="O"
_oTaskList.tASKUI.Dockable= 1
ENDIF

CD f:\dev
? FULLPATH("")