请问：有关获取键盘的控制键问题？高分奉上！
我用VB6做程序，遇到非常麻烦的问题：
就是键盘上的控制字符（如，LEFTKEY,RIGHTKEY,UPKEY,HOMEKEY等等），在程序中怎样知道用户敲入的这些键？怎样获取，请各位帮忙？
问题点数：80、回复次数：4Top
1 楼leolan（史留香）回复于 2004-11-02 12:39:25 得分 20
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyLeft
Print "Left"
Case vbKeyRight
Print "Right"
Case vbKeyUp
Print "Up"
Case vbKeyHome
Print "Home"
Case Else
Print Chr$(KeyCode)
End Select
End Sub
Private Sub Form_Load()
Me.AutoRedraw = True
End Sub
Top
2 楼xiaoyuanzhi（大侠）回复于 2004-11-02 12:58:44 得分 60
记住不能用keypress要keydown或keyup
Keycode 常数
可在代码中的任何地方用下列常数代替实际值：
常数 值 描述
vbKeyLButton 0x1 鼠标左键
vbKeyRButton 0x2 鼠标右键
vbKeyCancel 0x3 CANCEL 键
vbKeyMButton 0x4 鼠标中键
vbKeyBack 0x8 BACKSPACE 键
vbKeyTab 0x9 TAB 键
vbKeyClear 0xC CLEAR 键
vbKeyReturn 0xD ENTER 键
vbKeyShift 0x10 SHIFT 键
vbKeyControl 0x11 CTRL 键
vbKeyMenu 0x12 MENU 键
vbKeyPause 0x13 PAUSE 键
vbKeyCapital 0x14 CAPS LOCK 键
vbKeyEscape 0x1B ESC 键
vbKeySpace 0x20 SPACEBAR 键
vbKeyPageUp 0x21 PAGE UP 键
vbKeyPageDown 0x22 PAGE DOWN 键
vbKeyEnd 0x23 END 键
vbKeyHome 0x24 HOME 键
vbKeyLeft 0x25 LEFT ARROW 键
vbKeyUp 0x26 UP ARROW 键
vbKeyRight 0x27 RIGHT ARROW 键
vbKeyDown 0x28 DOWN ARROW 键
vbKeySelect 0x29 SELECT 键
vbKeyPrint 0x2A PRINT SCREEN 键
vbKeyExecute 0x2B EXECUTE 键
vbKeySnapshot 0x2C SNAPSHOT 键
vbKeyInsert 0x2D INSERT 键
vbKeyDelete 0x2E DELETE 键
vbKeyHelp 0x2F HELP 键
vbKeyNumlock 0x90 NUM LOCK 键
Top
3 楼aiur2000（破愿立志别故里,荆棘南下思北风）回复于 2004-11-02 12:59:38 得分 0
如果是组合键X+Alt
vbKeyX and (Shift and vbAltMask)Top
4 楼lxgmag（沧海亦心）回复于 2004-11-02 13:00:13 得分 0
谢谢！Top
相关问题
关键词
得分解答快速导航
相关链接
广告也精彩
反馈
