完善精易模块键盘_键代码取键名

pp25729391 · 发表于 2013-1-26 16:25:18

今天在写键盘钩子的时候调用精易模块的键盘_键代码取键名命令发现有很多键取不出来
正好模块今天开源了，我就把代码重写了一下，发出来给大家分享下!

有钱的可以下附件哈!

.版本 2
.子程序键盘_键代码取键名, 文本型, 公开, 取键代码的键名(返回键名)
.参数键代码, 整数型, , 键代码,如填:65,将返回 A键
' 小键盘键
.如果真 (键代码＝ 96)
返回 (“小键盘_0键”)
.如果真结束
.如果真 (键代码＝ 97)
返回 (“小键盘_1键”)
.如果真结束
.如果真 (键代码＝ 98)
返回 (“小键盘_2键”)
.如果真结束
.如果真 (键代码＝ 99)
返回 (“小键盘_3键”)
.如果真结束
.如果真 (键代码＝ 100)
返回 (“小键盘_4键”)
.如果真结束
.如果真 (键代码＝ 101)
返回 (“小键盘_5键”)
.如果真结束
.如果真 (键代码＝ 102)
返回 (“小键盘_6键”)
.如果真结束
.如果真 (键代码＝ 103)
返回 (“小键盘_7键”)
.如果真结束
.如果真 (键代码＝ 104)
返回 (“小键盘_8键”)
.如果真结束
.如果真 (键代码＝ 105)
返回 (“小键盘_9键”)
.如果真结束
.如果真 (键代码＝ 109)
返回 (“小键盘_减号”)
.如果真结束
.如果真 (键代码＝ 110)
返回 (“小键盘_点”)
.如果真结束
.如果真 (键代码＝ 111)
返回 (“小键盘_除号”)
.如果真结束

' 音键键
.如果真 (键代码＝ 173)
返回 (“静音键”)
.如果真结束
.如果真 (键代码＝ 174)
返回 (“音量减小键”)
.如果真结束
.如果真 (键代码＝ 175)
返回 (“音量增大键”)
.如果真结束
.如果真 (键代码＝ 44)
返回 (“Print键”)
.如果真结束
.如果真 (键代码＝ 145)
返回 (“Scroll键”)
.如果真结束
.如果真 (键代码＝ 19)
返回 (“Pause键”)
.如果真结束
' Print键 Scroll键 Pause键
.如果真 (键代码＝ #Tab键)
返回 (“TAB键”)
.如果真结束
.如果真 (键代码＝ 91 或键代码＝ 92)  ' 左右Win键
返回 (“Win键”)
.如果真结束
.如果真 (键代码＝ 93)  ' 菜单键
返回 (“菜单键”)
.如果真结束
.如果真 (键代码＝ 160 或键代码＝ 161)  ' 左右Shift键
返回 (“Shift键”)
.如果真结束
.如果真 (键代码＝ 162 或键代码＝ 163)  ' 左右Ctrl键
返回 (“Ctrl键”)
.如果真结束
.如果真 (键代码＝ 164 或键代码＝ 165)  ' 左右Alt键
返回 (“Alt键”)
.如果真结束
.判断开始 (键代码＝ #键0)
返回 (“0键”)
.判断 (键代码＝ #键1)
返回 (“1键”)
.判断 (键代码＝ #键2)
返回 (“2键”)
.判断 (键代码＝ #键3)
返回 (“3键”)
.判断 (键代码＝ #键4)
返回 (“4键”)
.判断 (键代码＝ #键5)
返回 (“5键”)
.判断 (键代码＝ #键6)
返回 (“6键”)
.判断 (键代码＝ #键7)
返回 (“7键”)
.判断 (键代码＝ #键8)
返回 (“8键”)
.判断 (键代码＝ #键9)
返回 (“9键”)
.判断 (键代码＝ #A键)
返回 (“A键”)
.判断 (键代码＝ #B键)
返回 (“B键”)
.判断 (键代码＝ #C键)
返回 (“C键”)
.判断 (键代码＝ #D键)
返回 (“D键”)
.判断 (键代码＝ #E键)
返回 (“E键”)
.判断 (键代码＝ #F键)
返回 (“F键”)
.判断 (键代码＝ #G键)
返回 (“G键”)
.判断 (键代码＝ #H键)
返回 (“H键”)
.判断 (键代码＝ #I键)
返回 (“I键”)
.判断 (键代码＝ #J键)
返回 (“J键”)
.判断 (键代码＝ #K键)
返回 (“K键”)
.判断 (键代码＝ #L键)
返回 (“L键”)
.判断 (键代码＝ #M键)
返回 (“M键”)
.判断 (键代码＝ #N键)
返回 (“N键”)
.判断 (键代码＝ #O键)
返回 (“O键”)
.判断 (键代码＝ #P键)
返回 (“P键”)
.判断 (键代码＝ #Q键)
返回 (“Q键”)
.判断 (键代码＝ #R键)
返回 (“R键”)
.判断 (键代码＝ #S键)
返回 (“S键”)
.判断 (键代码＝ #T键)
返回 (“T键”)
.判断 (键代码＝ #U键)
返回 (“U键”)
.判断 (键代码＝ #V键)
返回 (“V键”)
.判断 (键代码＝ #W键)
返回 (“W键”)
.判断 (键代码＝ #X键)
返回 (“X键”)
.判断 (键代码＝ #Y键)
返回 (“Y键”)
.判断 (键代码＝ #Z键)
返回 (“Z键”)
.判断 (键代码＝ #F1键)
返回 (“F1键”)
.判断 (键代码＝ #F2键)
返回 (“F2键”)
.判断 (键代码＝ #F3键)
返回 (“F3键”)
.判断 (键代码＝ #F4键)
返回 (“F4键”)
.判断 (键代码＝ #F5键)
返回 (“F5键”)
.判断 (键代码＝ #F6键)
返回 (“F6键”)
.判断 (键代码＝ #F7键)
返回 (“F7键”)
.判断 (键代码＝ #F8键)
返回 (“F8键”)
.判断 (键代码＝ #F9键)
返回 (“F9键”)
.判断 (键代码＝ #F10键)
返回 (“F10键”)
.判断 (键代码＝ #F11键)
返回 (“F11键”)
.判断 (键代码＝ #F12键)
返回 (“F12键”)
.判断 (键代码＝ #F13键)
返回 (“F13键”)
.判断 (键代码＝ #F14键)
返回 (“F14键”)
.判断 (键代码＝ #F15键)
返回 (“F15键”)
.判断 (键代码＝ #F16键)
返回 (“F16键”)
.判断 (键代码＝ #Break键)
返回 (“Break”)
.判断 (键代码＝ #回车键)
返回 (“回车键”)
.判断 (键代码＝ #Pause键)
返回 (“Pause键”)
.判断 (键代码＝ #CapsLock键)
返回 (“Caps Lock键”)
.判断 (键代码＝ #NumLock键)
返回 (“NumLock键”)
.判断 (键代码＝ #ScrollLock键)
返回 (“ScrollLock键”)
.判断 (键代码＝ #Esc键)
返回 (“Esc键”)
.判断 (键代码＝ #空格键)
返回 (“空格键”)
.判断 (键代码＝ #PageUp键)
返回 (“PageUp键”)
.判断 (键代码＝ #PageDown键)
返回 (“PageDown键”)
.判断 (键代码＝ #Home键)
返回 (“Home键”)
.判断 (键代码＝ #End键)
返回 (“End键”)
.判断 (键代码＝ #左光标键)
返回 (“左光标键”)
.判断 (键代码＝ #上光标键)
返回 (“上光标键”)
.判断 (键代码＝ #右光标键)
返回 (“右光标键”)
.判断 (键代码＝ #下光标键)
返回 (“下光标键”)
.判断 (键代码＝ #Ins键)
返回 (“Ins键”)
.判断 (键代码＝ #Del键)
返回 (“Del键”)
.判断 (键代码＝ #分号键)
返回 (“分号键”)
.判断 (键代码＝ #等号键)
返回 (“等号键”)
.判断 (键代码＝ #逗号键)
返回 (“逗号键”)
.判断 (键代码＝ #减号键)
返回 (“减号键”)
.判断 (键代码＝ #圆点键)
返回 (“圆点键”)
.判断 (键代码＝ #除号键)
返回 (“除号键”)
.判断 (键代码＝ #反撇号键)
返回 (“反撇号键”)
.判断 (键代码＝ #左中括号键)
返回 (“左中括号键”)
.判断 (键代码＝ #右中括号键)
返回 (“右中括号键”)
.判断 (键代码＝ #斜杠键)
返回 (“斜杠键”)
.判断 (键代码＝ #单引号键)
返回 (“单引号键”)
.判断 (键代码＝ 106)
返回 (“乘号键”)
.判断 (键代码＝ 107)
返回 (“加号键”)
.判断 (键代码＝ #退格键)
返回 (“退格键”)
.判断 (键代码＝ 91)
返回 (“Win键”)
.默认
.判断结束
返回 (“”)