How to activate a text box

[Guest]

I have a form that contains a text box and some other controls. After a
user uses one of the other controls, I would like to activate the text box
so that the user can immediately type in it without clicking it first.

Thanks for any help!

 

[Dan R.]

It depends on the control. For an option button:

Private Sub OptionButton1_Click()
Me.TextBox1.SetFocus
End Sub

Or for another textbox:

Private Sub TextBox1_Change()
If Len(Me.TextBox1.Text) = 4 Then
Me.TextBox2.SetFocus
End If
End Sub

 

[Guest]

Thanks - that works great!