on the LostFocus event of the text box, set the tab to 2. You'd probably want to put in some checking to be sure that the user really put in informtation where he/she should.
Private sub LastText_LostFocus()
' check to see if the information's filled in
If Len(Text1.Text) > 0 and Len(Text2.Text) > 0... Then
SSTab1.Tab = 1
End If
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.