Private Sub CommandButton3_Click()
Application.OnKey "{F3}", "uMain.ddd"
End Sub
Sub ddd()
Me.textbox1.SetFocus
End Sub

the upper source does not work.
i want to make a hotkey(shortcut) the specific textbox control.

*** Sent via Developersdex http://www.developersdex.com ***