VB 程序运行后，按键盘上任意一个键，屏幕中央弹出对话框，提示你所按的键是字母还是数字，还是其他字符。

显示全部楼层 · 2011-10-9 00:10:47

Private Sub Form_KeyPress(KeyAscii As Integer)
Dim k As String
k = LCase(Chr(KeyAscii))
If k >= "0" And k = "a" And k <= "z" Then
MsgBox "你所按的键是字母"
Else
MsgBox "你所按的键是其他字符"
End IfEnd Sub...

千问 · 2011-10-9 00:10:47

在form的Keypress里判断字符的ascii码就可以了。...