Select Case KeyAscii
Case 48 To 57 '只能输入数字
Case 65 To 90 '只能输入大写字母
Case 97 To 122 '只能输入小写字母
Case 8 '只能输入退格
Case Is < 0, &H20, &H8 '只能输入汉字
Case Else '否则
KeyAscii = 0 '输入无效