Using Shortcut Key to set focus?

[THCfog]

I was wondering if there was a way for this to work...

My app currently has focus on "Text1".
When the "Enter" key is pressed on the keyboard,I would like for my app to set focus to "Text2".

I put info into text1 and would rather hit enter to move to the next textbox than deal with the mouse(save alot of tme)

Is this easy to do?


Thanks Ahead of time.

[peet]

simulate a tab key

Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii = vbKeyReturn Then
        SendKeys "{tab}"
        KeyAscii = 0
    End If
End Sub

[peet]

KeyAscii = 0

is to prevent the annoying beep

[techyspecy]

Originally posted by peet
KeyAscii = 0

is to prevent the annoying beep

I'd say also include on error resume next and on error goto 0 in it.
Sendkeys is friggin weird.

[peet]

yes, you are probably right... I never used this code much.

He can also set focus to the text2 instead of using the sendkeys...