No it's not, but you can write your own
Code:Private Sub Text1_KeyPress(KeyAscii As Integer) If IsAlpha(KeyAscii) Then MsgBox "alpha" End If End Sub Public Function IsAlpha(intKey As Integer) As Boolean If (intKey > 96 And intKey < 123) Or _ (intKey > 64 And intKey < 91) Then IsAlpha = True End If End Function




Reply With Quote