IF lEnable FOR EACH loControl IN This.Controls IF TYPE("loControl.TabOrder") = T_NUMERIC and loControl.TabOrder = 1 loControl.SetFocus() EXIT ENDIF NEXT ENDIF