没有ASCII码!
只有键码常数!
键码常数
键码
常数 值 描述
vbKeyLButton 1 鼠标左键
vbKeyRButton 2 鼠标右键
vbKeyCancel 3 CANCEL 键
vbKeyMButton 4 鼠标中键
vbKeyBack 8 BACKSPACE 键
vbKeyTab 9 TAB 键
vbKeyClear 12 CLEAR 键
vbKeyReturn 13 ENTER 键
vbKeyShift 16 SHIFT 键
vbKeyControl 17 CTRL 键
vbKeyMenu 18 菜单键
vbKeyPause 19 PAUSE 键
vbKeyCapital 20 CAPS LOCK 键
vbKeyEscape 27 ESC 键
vbKeySpace 32 SPACEBAR 键
vbKeyPageUp 33 PAGEUP 键
vbKeyPageDown 34 PAGEDOWN 键
vbKeyEnd 35 END 键
vbKeyHome 36 HOME 键
vbKeyLeft 37 LEFT ARROW 键
vbKeyUp 38 UP ARROW 键
vbKeyRight 39 RIGHT ARROW 键
vbKeyDown 40 DOWN ARROW 键
vbKeySelect 41 SELECT 键
vbKeyPrint 42 PRINT SCREEN 键
vbKeyExecute 43 EXECUTE 键
vbKeySnapshot 44 SNAP SHOT 键
vbKeyInser 45 INS 键
vbKeyDelete 46 DEL 键
vbKeyHelp 47 HELP 键
vbKeyNumlock 144 NUM LOCK 键
只有键码常数!
键码常数
键码
常数 值 描述
vbKeyLButton 1 鼠标左键
vbKeyRButton 2 鼠标右键
vbKeyCancel 3 CANCEL 键
vbKeyMButton 4 鼠标中键
vbKeyBack 8 BACKSPACE 键
vbKeyTab 9 TAB 键
vbKeyClear 12 CLEAR 键
vbKeyReturn 13 ENTER 键
vbKeyShift 16 SHIFT 键
vbKeyControl 17 CTRL 键
vbKeyMenu 18 菜单键
vbKeyPause 19 PAUSE 键
vbKeyCapital 20 CAPS LOCK 键
vbKeyEscape 27 ESC 键
vbKeySpace 32 SPACEBAR 键
vbKeyPageUp 33 PAGEUP 键
vbKeyPageDown 34 PAGEDOWN 键
vbKeyEnd 35 END 键
vbKeyHome 36 HOME 键
vbKeyLeft 37 LEFT ARROW 键
vbKeyUp 38 UP ARROW 键
vbKeyRight 39 RIGHT ARROW 键
vbKeyDown 40 DOWN ARROW 键
vbKeySelect 41 SELECT 键
vbKeyPrint 42 PRINT SCREEN 键
vbKeyExecute 43 EXECUTE 键
vbKeySnapshot 44 SNAP SHOT 键
vbKeyInser 45 INS 键
vbKeyDelete 46 DEL 键
vbKeyHelp 47 HELP 键
vbKeyNumlock 144 NUM LOCK 键
这些事件是当一个对象具有焦点时按下 ( KeyDown ) 或松开 ( KeyUp ) 一个键时发生的。(要解释 ANSI 字符,应使用 KeyPress 事件。)语法Private Sub Form_KeyDown(keycode As Integer, shift As Integer)Private Sub object_KeyDown([index As Integer,]keycode As Integer, shift As Integer)Private Sub Form_KeyUp(keycode As Integer, shift As Integer)Private Sub object_KeyUp([index As Integer,]keycode As Integer, shift As Integer)KeyDown 和 KeyUp 事件包括下列部分:部分 描述
object 一个对象表达式,其值是“应用于”列表中的一个对象。
index 是一个整数,它用来唯一标识一个在控件数组中的控件。
keycode 是一个键代码,诸如 vbKeyF1 ( F1 键)或 vbKeyHome ( HOME 键)。要指定键代码,可使用对象浏览器中的 Visual Basic ( VB ) 对象库中的常数。
shift 是在该事件发生时响应 SHIFT ,CTRL 和 ALT 键的状态的一个整数。shift 参数是一个位域,它用最少的位响应 SHIFT 键(位 0 )、CTRL 键(位 1 )和 ALT 键(位 2 )。这些位分别对应于值 1、2 和 4。可通过对一些、所有或无位的设置来指明有一些、所有或零个键被按下。例如,如果 CTRL 和 ALT 这两个键都被按下,则 shift 的值为 6。
说明对于这两个事件来说,带焦点的对象都接收所有击键。一个窗体只有在不具有可视的和有效的控件时才可以获得焦点。虽然 KeyDown 和 KeyUp 事件可应用于大多数键,它们最经常地还是应用于: 扩展的字符键如功能键等。
定位键。
键盘修饰键和按键的组合。
区别数字小键盘和常规数字键。
在需要对按下和松开一个键都响应时,可使用 KeyDown 和 KeyUp 事件过程。下列情况不能引用 KeyDown 和 KeyUp 事件: 窗体有一个 CommandButton 控件,并且 Default 属性设置为 True 时的 ENTER 键。
窗体有一个 CommandButton 控件,并且 Cancel 属性设置为 True 时的 ESC 键。
TAB 键。
KeyDown 和 KeyUp 用两种参数解释每个字符的大写形式和小写形式:keycode —显示物理的键(将 A 和 a 作为同一个键返回)和 shift —显示 shift + key 键的状态而且返回 A 或 a 其中之一。如果需要测试 shift 参数,可使用该参数中定义各位的 shift 常数。该常数有下列值:常数 值 描述
vbShiftMask 1 SHIFT 键的位屏蔽。
VbCtrlMask 2 CTRL 键的位屏蔽。
VbAltMask 4 ALT 键的位屏蔽。
该常数用作位屏蔽。它可被用来测试任何键组合。测试一个条件时,首先将每个结果分配给一个临时整数变量,然后将 shift 与一个位屏蔽进行对比。如下例,可用 And 运算符和 shift 参数一起来测试条件是否大于 0。该条件说明该修正键被按下:ShiftDown = (Shift And vbShiftMask) > 0可按此例在一个过程中测试任何条件的组合:If ShiftDown And CtrlDown Then注意 如果 KeyPreview 属性被设置为 True,则一个窗体先于该窗体上的控件接收到此事件。可用 KeyPreview 属性来创建全局键盘处理例程。
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 键
vbKeyUp 38 UP ARROW 键
vbKeyRight 39 RIGHT ARROW 键
vbKeyDown 40 DOWN ARROW 键
#define KEYa 0x1e61
#define KEYb 0x3062
#define KEYc 0x2e63
#define KEYd 0x2064
#define KEYe 0x1265
#define KEYf 0x2166
#define KEYg 0x2267
#define KEYh 0x2368
#define KEYi 0x1769
#define KEYj 0x246a
#define KEYk 0x256b
#define KEYl 0x266c
#define KEYm 0x326d
#define KEYn 0x316e
#define KEYo 0x186f
#define KEYp 0x1970
#define KEYq 0x1071
#define KEYr 0x1372
#define KEYs 0x1f73
#define KEYt 0x1474
#define KEYu 0x1675
#define KEYv 0x2f76
#define KEYw 0x1177
#define KEYx 0x2d78
#define KEYy 0x1579
#define KEYz 0x2c7a
#define KEYA 0x1e41
#define KEYB 0x3042
#define KEYC 0x2e43
#define KEYD 0x2044
#define KEYE 0x1245
#define KEYF 0x2146
#define KEYG 0x2247
#define KEYH 0x2348
#define KEYI 0x1749
#define KEYJ 0x244a
#define KEYK 0x254b
#define KEYL 0x264c
#define KEYM 0x324d
#define KEYN 0x314e
#define KEYO 0x184f
#define KEYP 0x1950
#define KEYQ 0x1051
#define KEYR 0x1352
#define KEYS 0x1f53
#define KEYT 0x1454
#define KEYU 0x1655
#define KEYV 0x2f56
#define KEYW 0x1157
#define KEYX 0x2d58
#define KEYY 0x1559
#define KEYZ 0x2c5a
#define KEYCtrl_a 0x1e01
#define KEYCtrl_b 0x3002
#define KEYCtrl_c 0x2e03
#define KEYCtrl_d 0x2004
#define KEYCtrl_e 0x1205
#define KEYCtrl_f 0x2106
#define KEYCtrl_g 0x2207
#define KEYCtrl_h 0x2308
#define KEYCtrl_i 0x1709
#define KEYCtrl_j 0x240a
#define KEYCtrl_k 0x250b
#define KEYCtrl_l 0x260c
#define KEYCtrl_m 0x320d
#define KEYCtrl_n 0x310e
#define KEYCtrl_o 0x180f
#define KEYCtrl_p 0x1910
#define KEYCtrl_q 0x1011
#define KEYCtrl_r 0x1312
#define KEYCtrl_s 0x1f13
#define KEYCtrl_t 0x1414
#define KEYCtrl_u 0x1615
#define KEYCtrl_v 0x2f16
#define KEYCtrl_w 0x1117
#define KEYCtrl_x 0x2d18
#define KEYCtrl_y 0x1519
#define KEYCtrl_z 0x2c1a
#define KEYAlt_a 0x1e00
#define KEYAlt_b 0x3000
#define KEYAlt_c 0x2e00
#define KEYAlt_d 0x2000
#define KEYAlt_e 0x1200
#define KEYAlt_f 0x2100
#define KEYAlt_g 0x2200
#define KEYAlt_h 0x2300
#define KEYAlt_i 0x1700
#define KEYAlt_j 0x2400
#define KEYAlt_k 0x2500
#define KEYAlt_l 0x2600
#define KEYAlt_m 0x3200
#define KEYAlt_n 0x3100
#define KEYAlt_o 0x1800
#define KEYAlt_p 0x1900
#define KEYAlt_q 0x1000
#define KEYAlt_r 0x1300
#define KEYAlt_s 0x1f00
#define KEYAlt_t 0x1400
#define KEYAlt_u 0x1600
#define KEYAlt_v 0x2f00
#define KEYAlt_w 0x1100
#define KEYAlt_x 0x2d00
#define KEYAlt_y 0x1500
#define KEYAlt_z 0x2c00
#define KEY1 0x231
#define KEY2 0x332
#define KEY3 0x433
#define KEY4 0x534
#define KEY5 0x635
#define KEY6 0x736
#define KEY7 0x837
#define KEY8 0x938
#define KEY9 0xa39
#define KEY0 0xb30
#define KEYb1 0x2960 /* ` */
#define KEYa0 0xc2d /* - */
#define KEYa1 0xd3d /* = */
#define KEYa2 0x2b5c /* \ */
#define KEYBackspace 0xe08
#define KEYtab 0xf09
#define KEYReturn 0x1c0d
#define KEYInsert 0x5200
#define KEYHome 0x4700
#define KEYPageUp 0x4900
#define KEYDelete 0x5300
#define KEYEnd 0x4f00
#define KEYPageDown 0x5100
#define KEYUp 0x4800
#define KEYLeft 0x4b00
#define KEYDown 0x5000
#define KEYRight 0x4d00
#define KEYNUM00 0x352f /* / */
#define KEYNUM01 0x372a /* * */
#define KEYNUM02 0x4a2d /* - */
#define KEYNUM03 0x4e2b /* + */
#define KEYNUMReturn 0x1c0d
#define KEYNUM1 0x4f31
#define KEYNUM2 0x5032
#define KEYNUM3 0x5133
#define KEYNUM4 0x4b34
#define KEYNUM5 0x4c35
#define KEYNUM6 0x4d36
#define KEYNUM7 0x4737
#define KEYNUM8 0x4838
#define KEYNUM9 0x4939
#define KEYNUM0 0x5230
#define KEYNUMHome 0x532e
#define KEYNUMUp 0x4f00
#define KEYNUMPageup 0x5000
#define KEYNUMLeft 0x5100
#define KEYNUMSpace 0x4b00
#define KEYNUMRight 0x4d00
#define KEYNUMEnd 0x4700
#define KEYNUMDown 0x4800
#define KEYNUMPageDown 0x4900
#define KEYNUMIns 0x5200
#define KEYNUMDelete 0x5300
#define KEY_00 /*~*/ 0x297e
#define KEY_01 /*!*/ 0x221
#define KEY_02 /*@*/ 0x340
#define KEY_03 /*#*/ 0x423
#define KEY_04 /*$*/ 0x524
#define KEY_05 /*%*/ 0x625
#define KEY_06 /*^*/ 0x75e
#define KEY_07 /*&*/ 0x826
#define KEY_08 /***/ 0x92a
#define KEY_09 /*(*/ 0xa28
#define KEY_010 /*)*/ 0xb29
#define KEY_011 /*_*/ 0xc5f
#define KEY_012 /*+*/ 0xd2b
#define KEY_013 /*|*/ 0x2b7c
#define KEYF1 0x3b00
#define KEYF2 0x3c00
#define KEYF3 0x3d00
#define KEYF4 0x3e00
#define KEYF5 0x3f00
#define KEYF6 0x4000
#define KEYF7 0x4100
#define KEYF8 0x4200
#define KEYF9 0x4300
#define KEYF10 0x4400
#define KEYAlt_F1 0x6800
#define KEYAlt_F2 0x6900
#define KEYAlt_F3 0x6a00
#define KEYAlt_F4 0x6b00
#define KEYAlt_F5 0x6c00
#define KEYAlt_F6 0x6d00
#define KEYAlt_F7 0x6e00
#define KEYAlt_F8 0x6f00
#define KEYAlt_F9 0x7000
#define KEYAlt_F10 0x7100
#define KEYShift_F1 0x5400
#define KEYShift_F2 0x5500
#define KEYShift_F3 0x5600
#define KEYShift_F4 0x5700
#define KEYShift_F5 0x5800
#define KEYShift_F6 0x5900
#define KEYShift_F7 0x5a00
#define KEYShift_F8 0x5b00
#define KEYShift_F9 0x5c00
#define KEYShift_F10 0x5d00
#define KEYCtrl_F1 0x5e00
#define KEYCtrl_F2 0x5f00
#define KEYCtrl_F3 0x6000
#define KEYCtrl_F4 0x6100
#define KEYCtrl_F5 0x6200
#define KEYCtrl_F6 0x6300
#define KEYCtrl_F7 0x6400
#define KEYCtrl_F8 0x6500
#define KEYCtrl_F9 0x6600
#define KEYCtrl_F10 0x6700
#define KEY_d1 0x332c /* , */
#define KEY_d2 0x342e /* . */
#define KEY_d3 0x352f /* / */
#define KEYShift_d1 0x333c /* < */
#define KEYShift_d2 0x343e /* > */
#define KEYShift_d3 0x353f /* ? */
#define KEYCtrl_Alt_a 0x1e00
#define KEYCtrl_Alt_b 0x3000
#define KEYCtrl_Alt_c 0x2e00
#define KEYCtrl_Alt_d 0x2000
#define KEYCtrl_Alt_e 0x1200
#define KEYCtrl_Alt_f 0x2100
#define KEYCtrl_Alt_g 0x2200
#define KEYCtrl_Alt_h 0x2300
#define KEYCtrl_Alt_i 0x1700
#define KEYCtrl_Alt_j 0x2400
#define KEYCtrl_Alt_k 0x2500
#define KEYCtrl_Alt_l 0x2600
#define KEYCtrl_Alt_m 0x3200
#define KEYCtrl_Alt_n 0x3100
#define KEYCtrl_Alt_o 0x1800
#define KEYCtrl_Alt_p 0x1900
#define KEYCtrl_Alt_q 0x1000
#define KEYCtrl_Alt_r 0x1300
#define KEYCtrl_Alt_s 0x1f00
#define KEYCtrl_Alt_t 0x1400
#define KEYCtrl_Alt_u 0x1600
#define KEYCtrl_Alt_v 0x2f00
#define KEYCtrl_Alt_w 0x1100
#define KEYCtrl_Alt_x 0x2d00
#define KEYCtrl_Alt_y 0x1500
#define KEYCtrl_Alt_z 0x2c00
form1.keypress
msgbox keyasicc
end sub