KeyCode?KeyAscii?

Keycode

A ? Z A ? Z ? ASCII

?

vbKeyA 65 A ?

vbKeyB 66 B ?

vbKeyC 67 C ?

......

vbKeyX 88 X ?

vbKeyY 89 Y ?

vbKeyZ 90 Z ?

0 ? 9 0 ? 9 ? ASCII ?

?

vbKeyNumpad0 0x60 0 ?

vbKeyNumpad1 0x61 1 ?

vbKeyNumpad2 0x62 2 ?

vbKeyNumpad3 0x63 3 ?

vbKeyNumpad4 0x64 4 ?

vbKeyNumpad5 0x65 5 ?

vbKeyNumpad6 0x66 6 ?

vbKeyNumpad7 0x67 7 ?

vbKeyNumpad8 0x68 8 ?

vbKeyNumpad9 0x69 9 ?

vbKeyMultiply 0x6A MULTIPLICATION SIGN (*) ?

vbKeyAdd 0x6B PLUS SIGN (+) ?

vbKeySeparator 0x6C ENTER ?

vbKeySubtract 0x6D MINUS SIGN (?) ?

vbKeyDecimal 0x6E DECIMAL POINT (.) ?

vbKeyDivide 0x6F DIVISION SIGN (/) ?

KeyAsciiASCII?.

keypress是当键盘按下时触发，change是在文本框中的字符串变化时触发

keypress要比change先触发

而且keypress可以用来判断一些非可见字符，如:回车

ch(13)

private

sub

txtsource_keypress(keyascii

as

integer)

if

keyascii=13

then

..........(判断在textbox里是否按下回车键)

end

sub

keypress在调试的时候比较麻烦，注意一下

鹏仔微信 15129739599 鹏仔QQ344225443 鹏仔前端 pjxi.com 共享博客 sharedbk.com