Only allowing upper and lower case letters in KeyPress...

[JennyPeters]

I am trying to only allow upper and lower case letters in a KeyPress event of a text box. I can isolate the upper case by using the keyascii < vbKeyA or > vbKeyZ, but can't seem to isolate the lower case, as vbKeyA and vbKeyZ are only for uppercase.

Can can I detect lowercase letters?

Thanks,

Jenny

 

[dsi]

Check against the ASCII value:
A-Z: Chr(65) to Chr(90)
a-z: Chr(97) to Chr(122)

 

[TrivImp]

This snippet allows only upeer/lowercase letters and the backspace key:

Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case Asc(UCase(Chr(KeyAscii)))
Case vbKeyA To vbKeyZ, vbKeyBack
'do nothing
Case Else
KeyAscii = 0
End Select
End Sub

 

[JennyPeters]

This is excellent. Thanks to both of you!

Jenny