>This sort of thing may be of help...
>
>

>LOCAL lnLoop, lnClass,lnLoopPages, lnPagesControls, lcPageControlClass, lnPages
>WITH THISFORM
>	FOR lnLoop = 1 TO .CONTROLCOUNT
>		lcClass = UPPER(.CONTROLS[lnLoop].BASECLASS)
>		IF lcClass = "TEXTBOX" THEN
>			.CONTROLS[lnLoop].SETFOCUS
>		ENDIF
>		
>		IF lcClass ="PAGEFRAME" THEN
>			lnPages = .CONTROLS[lnLoop].PAGECOUNT
>			FOR lnLoopPages = 1 TO lnPages
>				FOR lnPagesControls = 1 TO .CONTROLS[lnLoop].PAGES[lnLoopPages].CONTROLCOUNT
>					lcPageControlClass = UPPER(.CONTROLS[lnLoop].PAGES[lnLoopPages].CONTROLS[lnPagesControls].BASECLASS)
>					IF lcPageControlClass == "TEXTBOX"
>						.CONTROLS[lnLoop].PAGES[lnLoopPages].CONTROLS[lnPagesControls].SETFOCUS()
>					ENDIF
>				ENDFOR
>			ENDFOR
>                ENDIF
>	ENDFOR
>ENDWITH
>

>
>but you would still probably need to set some property on the first control so that you have some way of identifying it in the controls collection.
>

TABINDEX may be what your looking for
>HTH