If Me.txtOne.TabIndex = 0 Then
Me.txtThree.TabIndex = 0
Me.txtTwo.TabIndex = 1
Me.txtOne.TabIndex = 2
Me.txtThree.SetFocus
Else
Me.txtOne.TabIndex = 0
Me.txtTwo.TabIndex = 1
Me.txtThree.TabIndex = 2
Me.txtOne.SetFocus
End If
Me.cmdTest.TabIndex = 3
End Sub
In this example txtOne, txtTwo and txtThree are text boxes, cmdTest is a
command button.
--
Brendan Reynolds
Access MVP
"CW" <C...@discussions.microsoft.com> wrote in message
news:8C755A49-4EE4-47B6...@microsoft.com...