Article ID: 142816
Article Last Modified on 7/1/2004
Private Sub Text1_KeyPress (KeyAscii As Integer)
If KeyAscii = 13 Then ' The ENTER key.
SendKeys "{tab}" ' Set the focus to the next control.
KeyAscii = 0 ' Ignore this key.
End If
End Sub
Private Sub Text2_KeyPress (KeyAscii As Integer)
If KeyAscii = 13 Then ' The ENTER key.
SendKeys "{tab}" ' Set the focus to the next control.
KeyAscii = 0 ' Ignore this key.
End If
End Sub
Additional query words: kbVBp400 kbVBp500 kbVBp600 kbControl kbVBp kbdsd kbDSupport
Keywords: kbhowto KB142816