Engage with tech pros in our community with native advertising, as a Vendor Expert, and more.
Function CLimitTextInput(KeyAscii) As Integer Select Case KeyAscii ' 65 To 90 and 97 To 122: These are all alphas, upper and lowercase ' 8 Backspace, 9 Tab Key, 32 Space Key Case 65 To 90, 97 To 122, 8, 9, 32 Case Else 'Setting KeyAscii to zero cancels the key input KeyAscii = 0 MsgBox ("Only Alphabetical Characters Allowed") Exit Function End Select End Function
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
20 Experts available now in Live!