vb调试模式下按键查看表达式的值

vb调试模式下按键查看表达式的值,第1张

VB在窗体中显示按下键盘按键的字母可以通过Form_KeyDown获取按键的KeyCode,然后再把KeyCode转换为相应的键的名字。

代码如下:

Private Sub Form_Load()

MeKeyPreview = True '使窗体可以获取键盘事件

End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Print KeyCodeToStr(KeyCode) '获取按键信息

End Sub

Public Function KeyCodeToStr(vbKeycode As Integer) '按键的KeyCode转为相应键盘键

If vbKeycode > 47 And vbKeycode < 91 Then

KeyCodeToStr = Chr(vbKeycode)

Exit Function

ElseIf vbKeycode > 111 And vbKeycode < 124 Then

KeyCodeToStr = "F" & vbKeycode - 111

Exit Function

End If

Select Case vbKeycode

Case 8: KeyCodeToStr = "Back"

Case 9: KeyCodeToStr = "Tab"

Case 12: KeyCodeToStr = "Clear"

Case 13: KeyCodeToStr = "Enter"

Case 16: KeyCodeToStr = "Shift"

Case 17: KeyCodeToStr = "Ctrl"

Case 18: KeyCodeToStr = "Alt"

Case 19

KeyCodeToStr = "Pause"

Case 20

KeyCodeToStr = "Caps Lock"

Case 27

KeyCodeToStr = "Esc"

Case 32

KeyCodeToStr = "Space"

Case 33

KeyCodeToStr = "Page Up"

Case 34

KeyCodeToStr = "Page Down"

Case 35

KeyCodeToStr = "End"

Case 36

KeyCodeToStr = "Home"

Case 41

KeyCodeToStr = "Select"

Case 42

KeyCodeToStr = "Print Screen"

Case 43

KeyCodeToStr = "Execute"

Case 44

KeyCodeToStr = "SnapShot"

Case 45

KeyCodeToStr = "Insert"

Case 46

KeyCodeToStr = "Delete"

Case 47

KeyCodeToStr = "Help"

Case 144

KeyCodeToStr = "Num Lock"

Case 189

KeyCodeToStr = "-_"

Case 187

KeyCodeToStr = "=+"

Case 255

KeyCodeToStr = "Unknown"

Case 192

KeyCodeToStr = "`~"

Case 37

KeyCodeToStr = "Left Arrow"

Case 38: KeyCodeToStr = "Up Arrow"

Case 39

KeyCodeToStr = "Right Arrow"

Case 40

KeyCodeToStr = "Dowm Arrow"

Case 219

KeyCodeToStr = "[{"

Case 221

KeyCodeToStr = "]}"

Case 186

KeyCodeToStr = ";:"

Case 222

KeyCodeToStr = "'"""

Case 220

KeyCodeToStr = "\|"

Case 188

KeyCodeToStr = ",<"

Case 190

KeyCodeToStr = ">"

Case 191

KeyCodeToStr = "/"

Case 193

KeyCodeToStr = "\"

Case Else

KeyCodeToStr = "Unknown"

End Select

End Function

ESC键

VK_ESCAPE

(27)

回车键:

VK_RETURN

(13)

TAB键:

VK_TAB

(9)

Caps

Lock键:

VK_CAPITAL

(20)

Shift键:

VK_SHIFT

($10)

Ctrl键:

VK_CONTROL

(17)

Alt键:

VK_MENU

(18)

空格键:

VK_SPACE

($20/32)

退格键:

VK_BACK

(8)

左徽标键:

VK_LWIN

(91)

右徽标键:

VK_LWIN

(92)

鼠标右键快捷键:VK_APPS

(93)

Insert键:

VK_INSERT

(45)

Home键:

VK_HOME

(36)

Page

Up:

VK_PRIOR

(33)

PageDown:

VK_NEXT

(34)

End键:

VK_END

(35)

Delete键:

VK_DELETE

(46)

方向键(←):

VK_LEFT

(37)

方向键(↑):

VK_UP

(38)

方向键(→):

VK_RIGHT

(39)

方向键(↓):

VK_DOWN

(40)

F1键:

VK_F1

(112)

F2键:

VK_F2

(113)

F3键:

VK_F3

(114)

F4键:

VK_F4

(115)

F5键:

VK_F5

(116)

F6键:

VK_F6

(117)

F7键:

VK_F7

(118)

F8键:

VK_F8

(119)

F9键:

VK_F9

(120)

F10键:

VK_F10

(121)

F11键:

VK_F11

(122)

F12键:

VK_F12

(123)

Num

Lock键:

VK_NUMLOCK

(144)

键盘0:

VK_NUMPAD0

(96)

小键盘1:

VK_NUMPAD0

(97)

小键盘2:

VK_NUMPAD0

(98)

小键盘3:

VK_NUMPAD0

(99)

小键盘4:

VK_NUMPAD0

(100)

小键盘5:

VK_NUMPAD0

(101)

小键盘6:

VK_NUMPAD0

(102)

小键盘7:

VK_NUMPAD0

(103)

小键盘8:

VK_NUMPAD0

(104)

小键盘9:

VK_NUMPAD0

(105)

小键盘:

VK_DECIMAL

(110)

小键盘:

VK_MULTIPLY

(106)

小键盘+:

VK_MULTIPLY

(107)

小键盘-:

VK_SUBTRACT

(109)

小键盘/:

VK_DIVIDE

(111)

Pause

Break键:

VK_PAUSE

(19)

Scroll

Lock键:

VK_SCROLL

(145

我也是在这上面找的>

VB键盘代码数值表可在代码中的任何地方用下列VB键盘代码常数代替实际值:VB键盘代码常量值

(0x为16进制,其他为10进制)键盘说明vbKeyLButton0x1鼠标左键vbKeyRButton0x2鼠标右键vbKeyCancel0x3CANCEL键vbKeyMButton0x4鼠标中键vbKeyBack0x8退格键vbKeyTab0x9TAB键vbKeyClear0xCCLEAR健vbKeyReturn0xD回车键vbKeyShift0x10SHIFT键vbKeyControl0x11CTRL键vbKeyMenu0x12MENU键vbKeyPause0x13PAUSE键vbKeyCapital0x14CAPS LOCK 键vbKeyEscape0x1BESC键vbKeySpace0x20空格键vbKeyPageUp0x21Page Up 键vbKeyPageDown0x22Page Down 键vbKeyEnd0x23END键vbKeyHome0x24HOME键vbKeyLeft0x25光标左键vbKeyUp0x26光标上键vbKeyRight0x27光标右键vbKeyDown0x28光标下键vbKeySelect0x29SELECT键vbKeyPrint0x2APrint Screen 键vbKeyExecute0x2BEXECUTE键vbKeySnapshot0x2CSnapShot键vbKeyInsert0x2DINSERT键vbKeyDelete0x2EDELETE键vbKeyHelp0x2FHELP键vbKeyNumlock0x90NUM LOCK 键vbKeyA65字母A键vbKeyB66字母B键vbKeyC67字母C键vbKeyD68字母D键vbKeyE69字母E键vbKeyF70字母F键vbKeyG71字母G键vbKeyH72字母H键vbKeyI73字母I键vbKeyJ74字母J键vbKeyK75字母K键vbKeyL76字母L键vbKeyM77字母M键vbKeyN78字母N键vbKeyO79字母O键vbKeyP80字母P键vbKeyQ81字母Q键vbKeyR82字母R键vbKeyS83字母S键vbKeyT84字母T键vbKeyU85字母U键vbKeyV86字母V键vbKeyW87字母W键vbKeyX88字母X键vbKeyY89字母Y键vbKeyZ90字母Z键vbKey048数字0键vbKey149数字1键vbKey250数字2键vbKey351数字3键vbKey452数字4键vbKey553数字5键vbKey654数字6键vbKey755数字7键vbKey856数字8键vbKey957数字9键vbKeyF10x70F1功能键vbKeyF20x71F2功能键vbKeyF30x72F3功能键vbKeyF40x73F4功能键vbKeyF50x74F5功能键vbKeyF60x75F6功能键vbKeyF70x76F7功能键vbKeyF80x77F8功能键vbKeyF90x78F9功能键vbKeyF100x79F10功能键vbKeyF110x7AF11功能键vbKeyF120x7BF12功能键vbKeyF130x7CF13功能键vbKeyF140x7DF14功能键vbKeyF150x7EF15功能键vbKeyF160x7FF16功能键vbKeyNumpad00x60小键盘0键vbKeyNumpad10x61小键盘1键vbKeyNumpad20x62小键盘2键vbKeyNumpad30x63小键盘3键vbKeyNumpad40x64小键盘4键vbKeyNumpad50x65小键盘5键vbKeyNumpad60x66小键盘6键vbKeyNumpad70x67小键盘7键vbKeyNumpad80x68小键盘8键vbKeyNumpad90x69小键盘9键vbKeyMultiply0x6A小键盘键vbKeyAdd0x6B小键盘+键vbKeySeparator0x6C小键盘回车键vbKeySubtract0x6D小键盘-键vbKeyDecimal0x6E小键盘键vbKeyDivide0x6F小键盘/键

以上就是关于vb调试模式下按键查看表达式的值全部的内容,包括:vb调试模式下按键查看表达式的值、VB ALT键盘键值、VB中键盘每个按键所对应的具体数值是例如:enter是对应13.等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/web/9763179.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-01
下一篇2023-05-01

发表评论

登录后才能评论

评论列表(0条)

    保存