Visual Basic Programming Code Examples Visual Basic > Forms Code Examples Enter Key working as Tab Enter Key working as Tab Public Sub AllowNumbersOnly(KeyAscii As Integer) 'PROCEDURE TO RESTRICT THE INPUT IN A TEXT BOX TO 'NUMBERS 'USED IN THE KEY_PRESS EVENT HANDLER 'THIS SUB ALSO SETS THE ENTER KEY AS TAB KEY TO MOVE FOCUS Select Case KeyAscii Case 13 KeyAscii = 0 SendKeys "{tab}" Case Asc("A") To Asc("z"), 32 To 47, 58 To 64, 124 To 258 ' invalid charecters so beep Dim i As Integer For i = vbKey0 To 20 Beep Next i KeyAscii = 0 End Select Exit Sub End Sub and call it Private sub text1_KeyPress(KeyAscii As Integer) Call AllowNumbersOnly(KeyAscii) End Sub