百燕之家 / 问答 / 详情

使用Vue如何实现数字键盘组件

2023-09-20 13:59:29
王木生

最近做 Vue 开发,因为有不少页面涉及到金额输入,产品老是觉得用原生的 input 进行金额输入的话 体验很不好,于是自己动手写了一个使用Vue自定义数字键盘组件,具体实现代码大家参考下本文

为了满足用户体验,我用vue写了一个自定义数字键盘组件,用户体验度还不错。

废话不多说,先上效果图吧~

效果图

具体实现

布局排版

<p class="key-container">

<p class="key-title">请输入金额</p>

<p class="input-box">{{ money }}</p>

<p class="keyboard" @click.stop="_handleKeyPress">

<p class="key-row">

<p class="key-cell" data-num="7">7</p>

<p class="key-cell" data-num="8">8</p>

<p class="key-cell" data-num="9">9</p>

<p class="key-cell" data-num="D">C</p>

</p>

<p class="key-row">

<p class="key-cell" data-num="4">4</p>

<p class="key-cell" data-num="5">5</p>

<p class="key-cell" data-num="6">6</p>

<p class="key-cell" data-num="C">清空</p>

</p>

<p class="key-row">

<p class="key-cell" data-num="1">1</p>

<p class="key-cell" data-num="2">2</p>

<p class="key-cell" data-num="3">3</p>

<p class="key-cell" data-num="-1"></p>

</p>

<p class="key-row">

<p class="key-cell disabled" data-num="-1"></p>

<p class="key-cell" data-num=".">.</p>

<p class="key-cell" data-num="0">0</p>

<p class="key-cell" data-num="-1"></p>

</p>

<p class="key-confirm" data-num="S">确认</p>

</p>

</p>布局方面我全部采用了 p 元素来模拟,方便好用 (??д?)b

键盘按键方面,每个按钮都设置了其自定义属性值 num ,目的就是为了区分按键后产生不同的效果

事件绑定在了父级,通过捕获来确定具体点击的元素

样式代码我在这里就不贴了,具体的我托管到 github 上了~

输入判断

对于键盘来说,最主要的就是输入判断,整个键盘的输入都是先经过 _handleKeyPress 进行处理的

//处理按键

_handleKeyPress(e) {

let num = e.target.dataset.num;

//不同按键处理逻辑

// -1 代表无效按键,直接返回

if (num == -1) return false;

switch (String(num)) {

//小数点

case ".":

this._handleDecimalPoint();

break;

//删除键

case "D":

this._handleDeleteKey();

break;

//清空键

case "C":

this._handleClearKey();

break;

//确认键

case "S":

this._handleConfirmKey();

break;

default:

this._handleNumberKey(num);

break;

}

}可以看出,我将按键种类分为了,五大类,分别是 小数点 、 删除(退格)键 、 清空键 、 确认键 和 数字键 ,分别对用不同的处理函数,接下来我们一一来分析~

小数点,由于最多只能输入一个小数点,因此需要对其判断,如果有小数点直接返回;没有的话,也要分小数点是不是第一个输入的字符,如果是就将其变成 0. ,如果不是将小数点追加到当前字符末尾;

//处理小数点函数

_handleDecimalPoint() {

//如果包含小数点,直接返回

if (this.money.indexOf(".") > -1) return false;

//如果小数点是第一位,补0

if (!this.money.length)

this.money = "0.";

//如果不是,添加一个小数点

else

this.money = this.money + ".";

}删除(退格)键,处理起来比较方便,先判断当前输入的字符是否为空,如果没有字符,直接返回,否则将字符串最后一个字符删除;

//处理删除键

_handleDeleteKey() {

let S = this.money;

//如果没有输入,直接返回

if (!S.length) return false;

//否则删除最后一个

this.money = S.substring(0, S.length - 1);

}清空键,逻辑最简单,直接将当前字符清空即可;

//处理清空键

_handleClearKey() {

this.money = "";

}确认键,判断当前字符是否为空,为空就提示信息并返回,不为空我们也要进行判断,如果输入的是 8. 这种格式,我们需要对齐格式化成 8.00 这种形式,否则就直接保留两位小数,最后在触发 回调,并把结果作为参数传递过去;

_handleConfirmKey() {

let S = this.money;

//未输入

if (!S.length){

alert( "您目前未输入!" )

return false;

}

//将 8. 这种转换成 8.00

if (S.indexOf(".") > -1 && S.indexOf(".") == (S.length - 1))

S = Number(S.substring(0, S.length - 1)).toFixed(2);

//保留两位

S = Number(S).toFixed(2);

this.$emit("confirmEvent",S)

}数字键,逻辑也不是很复杂,主要先看其有没有小数点,如果有小数点,那么最多输入两位数字,如果没有小数点,得判断第一位输入的是是不是0 , 如果是0,那么接下来就只能输入小数点了,而且也要杜绝 0000 这种无效的输入,因此我多加了一个判断,否则就直接追加在当前字符后面即可;

//处理数字

_handleNumberKey(num) {

let S = this.money;

//如果有小数点且小数点位数不小于2

if ( S.indexOf(".") > -1 && S.substring(S.indexOf(".") + 1).length < 2)

this.money = S + num;

//没有小数点

if (!(S.indexOf(".") > -1)) {

//如果第一位是0,只能输入小数点

if (num == 0 && S.length == 0)

this.money = "0.";

else {

if (S.length && Number(S.charAt(0)) === 0) return;

this.money = S + num;

}

}

}组件引入

组件准备好了,只需填好路径,在对应的 components 中注册后,直接放在页面上使用使用即可,类似下面

<calculation @confirmEvent="_confirmEvent"></calculation>其中, _confirmEvent 是点击确认键的回调,参数就是输入的金额,我这里只是简单的打印而已~

_confirmEvent(res){

console.log(res)

}效果就跟下面差不多,

上面是我整理给大家的,希望今后会对大家有帮助。

相关文章:

使用mock.js生成随机数据

使用Node.js如何实现资讯爬虫(详细教程)

MySQL修改root密码

如何编写有质量的JS代码

如何用代码打出字

按住Alt键,然后小键盘输入数字代码就行了,例如:按住Alt,小键盘输入49899,放开Alt键,即出现“码”字。具体的代码和数字的对应关系可以在“开始->附件->系统工具->字符映射表”中查看。
2023-09-18 15:50:231

谁知道电脑键盘按键代码表

我自己搞了个 读取键代码的 小程序 按任意键就能显示出你所按的键的键代码,要不要
2023-09-18 15:50:336

键盘代码

字母和数字键的键码值(keyCode) 按键 键码 按键 键码 按键 键码 按键 键码 A 65 J 74 S 83 1 49 B 66 K 75 T 84 2 50 C 67 L 76 U 85 3 51 D 68 M 77 V 86 4 52 E 69 N 78 W 87 5 53 F 70 O 79 X 88 6 54 G 71 P 80 Y 89 7 55 H 72 Q 81 Z 90 8 56 I 73 R 82 0 48 9 57 数字键盘上的键的键码值(keyCode) 功能键键码值(keyCode) 按键 键码 按键 键码 按键 键码 按键 键码 0 96 8 104 F1 112 F7 118 1 97 9 105 F2 113 F8 119 2 98 * 106 F3 114 F9 120 3 99 + 107 F4 115 F10 121 4 100 Enter 108 F5 116 F11 122 5 101 - 109 F6 117 F12 123 6 102 . 110 7 103 / 111控制键键码值(keyCode) 按键 键码 按键 键码 按键 键码 按键 键码 BackSpace 8 Esc 27 Right Arrow 39 -_ 189 Tab 9 Spacebar 32 Down Arrow 40 .> 190 Clear 12 Page Up 33 Insert 45 /? 191 Enter 13 Page Down 34 Delete 46 `~ 192 Shift 16 End 35 Num Lock 144 [{ 219 Control 17 Home 36 ;: 186 | 220 Alt 18 Left Arrow 37 =+ 187 ]} 221 Cape Lock 20 Up Arrow 38 ,< 188 "" 222
2023-09-18 15:51:591

谁知道易语言里面写小键盘上的0到9怎么写阿? 比如回车键不是#回车么,那小键盘上的是#什么?

好像是#键1
2023-09-18 15:52:084

谁知道电脑键盘按键代码表

键盘按键和键盘对应代码表: A <--------> 65 B <--------> 66 C <--------> 67 D <--------> 68 E <--------> 69 F <--------> 70 G <--------> 71 H <--------> 72 I <--------> 73 J <--------> 74 K <--------> 75 L <--------> 76 M <--------> 77 N <--------> 78 O <--------> 79 P <--------> 80 Q <--------> 81 R <--------> 82 S <--------> 83 T <--------> 84 U <--------> 85 V <--------> 86 W <--------> 87 X <--------> 88 Y <--------> 89 Z <--------> 90 0 <--------> 48 1 <--------> 49 2 <--------> 50 3 <--------> 51 4 <--------> 52 5 <--------> 53 6 <--------> 54 7 <--------> 55 8 <--------> 56 9 <--------> 57 数字键盘 1 <--------> 96 数字键盘 2 <--------> 97 数字键盘 3 <--------> 98 数字键盘 4 <--------> 99 数字键盘 5 <--------> 100 数字键盘 6 <--------> 101 数字键盘 7 <--------> 102 数字键盘 8 <--------> 103 数字键盘 9 <--------> 104 数字键盘 0 <--------> 105 乘号 <--------> 106 加号 <--------> 107 Enter <--------> 108 减号 <--------> 109 小数点 <--------> 110 除号 <--------> 111 F1 <--------> 112 F2 <--------> 113 F3 <--------> 114 F4 <--------> 115 F5 <--------> 116 F6 <--------> 117 F7 <--------> 118 F8 <--------> 119 F9 <--------> 120 F10 <--------> 121 F11 <--------> 122 F12 <--------> 123 F13 <--------> 124 F14 <--------> 125 F15 <--------> 126 Backspace <--------> 8 Tab <--------> 9 Clear <--------> 12 Enter <--------> 13 Shift <--------> 16 Control <--------> 17 Alt <--------> 18 Caps Lock <--------> 20 Esc <--------> 27 空格键 <--------> 32 Page Up <--------> 33 Page Down <--------> 34 End <--------> 35 Home <--------> 36 左箭头 <--------> 37 向上箭头 <--------> 38 右箭头 <--------> 39 向下箭头 <--------> 40 Insert <--------> 45 Delete <--------> 46 Help <--------> 47 Num Lock <--------> 144 ; : <--------> 186 = + <--------> 187 - _ <--------> 189 / ? <--------> 191 ` ~ <--------> 192 [ { <--------> 219 | <--------> 220 ] } <--------> 221 "" " <--------> 222
2023-09-18 15:52:241

易语言 监视小键盘数字的代码怎么写(我用超级模块6.5)

看键代码,在按下某键的事件中,对比键代码是否为小键盘的键代码就知道了。具体哪个键代码代表小键盘那个按键,请我的百度空间。
2023-09-18 15:52:312

易语言模拟按键 数字键(要小键盘的)

.版本 2.支持库 spec.支持库 eAPI.程序集 窗口程序集_启动窗口.子程序 __启动窗口_创建完毕_启动窗口.获取焦点 ().子程序 __启动窗口_按下某键, 逻辑型.参数 键代码, 整数型.参数 功能键状态, 整数型调试输出 (键代码).子程序 __启动窗口_鼠标左键被按下, 逻辑型, , 鼠标键功能.参数 横向位置, 整数型.参数 纵向位置, 整数型.参数 功能键状态, 整数型" 模拟按键 (144, , ).子程序 _按钮1_被单击模拟按键 (144, , )
2023-09-18 15:53:092

键盘各键对应的ASCII码值(包括鼠标和键盘所有的键)

常见的Delete、Enter、Bakspace键都是有其应用的使用价值,像Ctrl、Alt、Shift这种组合键也是使我们如鱼得水。下面我为大伙儿产生了电脑上键盘功能的详解,有兴趣爱好的小伙伴们快看来一下吧!键盘正中间区域的全部输入按键。一共是二十六个英文字母、10个数字和11个常见的符号,另加一个细细长长空白键,这种按键功能很简洁明了,便是在文本文档编辑、软件闲聊打字时用以输入文字和数字的。自然,假如输入英文,就立即按键,假如输入中文必须用拼音或是五笔输入法。说到输入按键,就得说一下Shift按键,中文名称是“上档键”。在键盘上下各一个,便捷两只手各自按,但功能是一样的。一切正常按英文字母键是小写字母的,按着“上档键”的与此同时,再按字母键,输入的便是大写的了。并且,每一个数字和符号按键上都是有2个符号,按着“上档键”的与此同时按某一个键,就可以输入印在顶端的那一个符号。例如,按着“上档键”的与此同时按数字8的按键,便会输入“*”。
2023-09-18 15:53:174

请教:数字键盘0至9键对应的代码分别是多少?

你问题中 所谓网上说的 跟你 自己测试的有什么分别么无非就是一个顺序错乱的问题,可以肯定的告诉你 你用KeyDown事件测试的是对的楼下那位兄弟用的是KeyPress事件,出来的结果是ascii码值,并不是小键盘的keycode
2023-09-18 15:53:332

魔兽争霸小键盘数字如何换成大键盘

应该是不可以的所以不用花心思
2023-09-18 15:53:432

ALT+小键盘数字能出现的所有特殊符号

http://tieba.baidu.com/f?kz=388544435
2023-09-18 15:53:522

AutoHotkey里数字键盘的del的代码是什么

看你这提示,应该是1)当前用于启动的是非启动盘;2)用于启动的磁盘无法读取。造成的原因可能一般有下:1、BIOS设置的启动盘错误,将启动盘设置成光盘、软盘或U盘等,恰好电脑上有U盘、软盘或光盘;2、硬盘接触不好3、硬盘模式设置错误4、硬盘MBR错误当然也不排除硬盘报废的可能,我以前就在电脑启动时移了下,结果硬盘就废了,怎么折腾都没用。你可以作如下尝试:1、检查光驱、U盘、软盘等,如有则取出;2、进BIOS将启动项设置中硬盘启动设为第一启动盘,重启尝试是否可启动;3、进BIOS,修改硬盘模式,设置不同的模式后都尝试重新启动,看是否能启动;4、拆开机箱,将硬盘线拔了重新接上,再尝试是否可启动;开机过程注意听听并用手触摸下硬盘转动是否正常;5、用其他光盘或U盘启动,用“FDISK /MBR”尝试修复硬盘的MBR,也可以尝试一下其他的MBR修复方法,如以前DOS时代的NDD等。这方面可以多查下网上的相关资料。注意:用FDISK命令等对硬盘进行操作时务必仔细,否则将失去分区,也就是失去硬盘上所有数据。还有一种方法就是将硬挂到其他机上进行修复。希望能对你有所帮助。
2023-09-18 15:53:591

如何激活键盘右边的数字小键盘?

小键盘设置编辑设置开机使用数字小键盘,具体设置方法如下:⒈在“开始菜单”里,点“运行”,输入regedit,这是注册表,第二个文件夹,也就是HKEY_CURRENT_USER,进ConsolePanelKeyboard,那里有三个选项
2023-09-18 15:54:244

键盘上"1"左边的"~"的代码是多少?

126 你按住alt 键再依次按小键盘上的 1 2 6 就可以在 word 或 记事本 中 打出来
2023-09-18 15:54:451

魔兽改键 小键盘4 7 的代码是多少?

去下个番茄助手 记得你魔兽的版本要 1.20E 的 那个改建比较简单 支持显血 开全图
2023-09-18 15:54:521

flash高手告诉我flash里键盘各个按键的代码是多少??

字母 A 到 Z 和标准数字 0 到 9A(65) B(66) C(67) D(68) E(69) F(70) G(71) H(72) I(73) J(74) K(75) L(76) M(77) N(78) O(79) P(80) Q(81) R(82) S(83) T(84) U (85) V(86) W(87) X(88) Y(89) Z(90) 0(48) 1(49) 2(50) 3(51) 4(52) 5(53) 6(54) 7(55) 8(56) 9(57) 数字键盘上的键数字键盘0(96) 数字键盘1(97) 数字键盘2(98) 数字键盘3(99) 数字键盘4(100) 数字键盘5(101) 数字键盘6(102) 数字键盘7(103) 数字键盘8(104) 数字键盘9(105) 乘号(106) 加号(107) Enter(13) 减号(109) 小数点(110) 除号(111)功能键F1(112) F2(113) F3(114) F4(115) F5(116) F6(117) F7(118) F8(119) F9(120) F10(121) F11(122) F12(123) F13(124) F14(125) F15(126)其它键Backspace(8) Tab(9) Enter(13) Shift(16) Control(17) Caps Lock(20) Esc(27) 空格键(32) Page Up(33) Page Down(34) End(35) Home(36) 左箭头(37) 向上箭头(38) 右箭头(39) 向下箭头(40) Insert(45) Delete(46) Num Lock(144) ScrLk(145) Pause/Break(19) ; :(186) = +(187) - _(189) / ?(191) ` ~(192) [ {(219) |(220) ] }(221) " "(222) ,(188) .(190)
2023-09-18 15:54:591

javascript键盘上的按键所对应的代码是什么

字母和数字键的键码值(keyCode) 按键 键码 按键 键码 按键 键码 按键 键码 A 65 J 74 S 83 1 49 B 66 K 75 T 84 2 50 C 67 L 76 U 85 3 51 D 68 M 77 V 86 4 52 E 69 N 78 W 87 5 53 F 70 O 79 X 88 6 54 G 71 P 80 Y 89 7 55 H 72 Q 81 Z 90 8 56 I 73 R 82 0 48 9 57 数字键盘上的键的键码值(keyCode) 功能键键码值(keyCode) 按键 键码 按键 键码 按键 键码 按键 键码 0 96 8 104 F1 112 F7 118 1 97 9 105 F2 113 F8 119 2 98 * 106 F3 114 F9 120 3 99 + 107 F4 115 F10 121 4 100 Enter 108 F5 116 F11 122 5 101 - 109 F6 117 F12 123 6 102 . 110 7 103 / 111 控制键键码值(keyCode) 按键 键码 按键 键码 按键 键码 按键 键码 BackSpace 8 Esc 27 Right Arrow 39 -_ 189 Tab 9 Spacebar 32 Down Arrow 40 .> 190 Clear 12 Page Up 33 Insert 45 /? 191 Enter 13 Page Down 34 Delete 46 `~ 192 Shift 16 End 35 Num Lock 144 [{ 219 Control 17 Home 36 ;: 186 | 220 Alt 18 Left Arrow 37 =+ 187 ]} 221 Cape Lock 20 Up Arrow 38 ,< 188 "" 222
2023-09-18 15:55:061

炒股时,小键盘操作快捷命令有哪些?

炒股键盘灵犀一键,炒股人必备。快速交易,按键功能自己设定,
2023-09-18 15:55:165

按键精灵按键码问题

0 NULL 32 [space] 64 @ 96 ` 1 · 33 ! 65 A 97 a 2 · 34 " 66 B 98 b 3 · 35 # 67 C 99 c 4 · 36 $ 68 D 100 d 5 · 37 % 69 E 101 e 6 · 38 & 70 F 102 f 7 · 39 " 71 G 103 g 8 * * 40 ( 72 H 104 h 9 * * 41 ) 73 I 105 i 10 * * 42 * 74 J 106 j 11 · 43 + 75 K 107 k 12 · 44 , 76 L 108 l 13 * * 45 - 77 M 109 m 14 · 46 . 78 N 110 n 15 · 47 / 79 O 111 o 16 · 48 0 80 P 112 p 17 · 49 1 81 Q 113 q 18 · 50 2 82 R 114 r 19 · 51 3 83 S 115 s 20 · 52 4 84 T 116 t 21 · 53 5 85 U 117 u 22 · 54 6 86 V 118 v 23 · 55 7 87 W 119 w 24 · 56 8 88 X 120 x 25 · 57 9 89 Y 121 y 26 · 58 : 90 Z 122 z 27 · 59 ; 91 [ 123 { 28 · 60 < 92 124 | 29 · 61 = 93 ] 125 } 30 · 62 > 94 ^ 126 ~ 31 · 63 ? 95 _ 127 · 这是ASCII码,并非是按键精灵特有的。
2023-09-18 15:55:352

如何让没有设计小键盘的笔记本电脑使用小键盘功能?

使用热键!Fn+Numlock!打开数字锁定!这样再找到键盘上字母标识数字的就可以了!U,I,O,J,K,L,M都是数字了!
2023-09-18 15:55:525

我要把小键盘上的减号按键替换成win键(开始),下面的代码是不是正确的?

可以考虑用keytweak我就用这个改的右alt键和菜单键。不过,话说比赛里注册表也不允许改的吧。否则那些职业选手就都把小键盘的键挪到左边了。甚至像我这种对规则采取“用尽其极”态度的人,会直接把左手挪到键盘中间位置,谈论改键时,说的是:第一技能键,第二技能键,编队键……qq:854278715祝你比赛顺利。
2023-09-18 15:56:071

笔记本电脑的小键盘怎么弄出来?

fn + numlk(在最上面的Fn键里找),出来后,你看字母上的数字就是你的小键盘
2023-09-18 15:56:295

AIt+小键盘打字,汉字与代码如何转换?

现在上网用OICQ聊天的比比皆是,但是用QQ聊天全部用热键的却不多哦!大多数人喜欢拖着一只小老鼠。不但不方便而且很慢!笔者现在就介绍一种全部用热键聊天的方法! 先从收信息开始吧。收信息的朋友喜欢双击好友列表上的头像,或点击任务栏右下角的头像,一旦点错误的话就会出现“上线”、“离开”什么的。很是烦人!你可点击图文框左下角的OICQ,然后再点击系统参数中的系统热键,在自定义热键里设置你喜欢的热键。本人有2个QQ,所以喜欢把一个QQ设置为Alt+A一个设置为Alt+D。最好别设置为Alt+S!因为……看完下边就会知道的(对了,别忘了点击“确定”哦!)。收到信息后当然是回信息啦,你可以试试系统默认的热键Alt+R。因为聊天的对象很多,所以常会出现不知该说什么好,很想看聊天记录。这时你可以用Alt+H。如果你看完聊天记录再回话的话,要按一下Tab键哦!要不你所打的字将不会在对话框上出现!如果你是和你很好的朋友想单独聊会的话,可以用Alt+T来转换对话模式。当然你在聊天时也会遇见你所讨厌的人,你大可不必去理会他(她),只要在回信息时按Alt+C就可以取消发送了!最后是回信息了,大家习惯用的方法是Ctrl+Shift或者直接点发信息,还有一种简单的方法是Alt+S。也是系统默认的,所以前边自定义热键最好不要定义为…… 在聊天时,网友问你E-mail这是常有的事,这时要换输入法打E-mail的,你可以按Ctrl+Shift,每按一次换一种输入方法。有没有更快的呢?当然有啊!按Ctrl+空格可以直接替换成英语打字法,再按一次的话,它会恢复成替换前的输入法。 如果你的好友问你今天是星期几的话?打大写的一、二、三……是不是很烦人呢?这时你也可以用方便的快捷热键,只要在阿拉伯数字前加i就可以了!如i1,是一,i2是二,i3是三以次类推……是不是很方便呢?有些朋友看见许多好看而又奇怪的符号,就喜欢把它复制下来粘贴在QQ上(Ctrl+C复制、Ctrl+V粘贴),谁知道它们是怎么来的吗?那你就试试v+1,v+2,v+3……还可按加号翻页,很多的(但是只能在智能ABC输入法下才可实现)
2023-09-18 15:57:181

希腊字母的一二三用键盘该怎么打?

希腊字母有一二三吗?希腊字母不是α、β、γ等等吗?你说的是罗马字母I,II,III吧?如果不要求很标准的那种,可以在WORD中,字体选择宋体,直接打英文字母大写的【I】(键盘上K右边那个字母)。如果要求严格只能搜狗拼音了。。。
2023-09-18 15:57:283

ahk热键高手请帮忙,如何用小键盘一个数字代表一个数值?

您好!使用键盘控制鼠标,请参考一下步骤(适用于Windows Vista 和Windows 7):①同时按下 左Alt,左Shift 和 Num Lock 三个按键启用鼠标键。(如果无效,请在开始菜单搜索“轻松访问中心”并进入,进入“使鼠标更易于使用”,选中“启用鼠标键”)。②此时小键盘(右边的数字区域)的1,2,3,4,6,7,8,9键控制鼠标像指定的方向移动,5键单击。③您可以进入鼠标键的设置自行设置调节鼠标移动速度。您也可以通过Windows语音识别控制鼠标。
2023-09-18 15:58:031

如何在VB中实现大写锁定/小键盘/Scroll的指示

"//VB6.0 "//添加3个按钮:CommandScroll、CommandCapsLock、CommandNumLock "//以及一个TIMER:Timer1 "//添加如下代码: Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As IntegerPrivate Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Private Declare Function MapVirtualKey Lib "user32" Alias "MapVirtualKeyA" (ByVal wCode As Long, ByVal wMapType As Long) As LongPrivate Const KEYEVENTF_EXTENDEDKEY = &H1Private Const KEYEVENTF_KEYUP = &H2Private Sub SetKeyState(ByVal Key As Long, ByVal State As Boolean)Call keybd_event(Key, MapVirtualKey(Key, 0), KEYEVENTF_EXTENDEDKEY Or 0, 0)Call keybd_event(Key, MapVirtualKey(Key, 0), KEYEVENTF_EXTENDEDKEY Or KEYEVENTF_KEYUP, 0)End SubPrivate Property Get CapsLock() As Boolean CapsLock = GetKeyState(KeyCodeConstants.vbKeyCapital) = 1End PropertyPrivate Property Let CapsLock(ByVal Value As Boolean) Call SetKeyState(KeyCodeConstants.vbKeyCapital, Value)End PropertyPrivate Property Get NumLock() As Boolean NumLock = GetKeyState(KeyCodeConstants.vbKeyNumlock) = 1End PropertyPrivate Property Let NumLock(ByVal Value As Boolean) Call SetKeyState(KeyCodeConstants.vbKeyNumlock, Value)End PropertyPrivate Property Get ScrollLock() As Boolean ScrollLock = GetKeyState(KeyCodeConstants.vbKeyScrollLock) = 1End PropertyPrivate Property Let ScrollLock(ByVal Value As Boolean) Call SetKeyState(KeyCodeConstants.vbKeyScrollLock, Value)End PropertyPrivate Sub CommandCapsLock_Click() CapsLock = Not CapsLockEnd SubPrivate Sub CommandNumLock_Click() NumLock = Not NumLockEnd SubPrivate Sub CommandScroll_Click() ScrollLock = Not ScrollLockEnd SubPrivate Sub Timer1_Timer() CommandCapsLock.Font.Bold = CapsLock CommandNumLock.Font.Bold = NumLock CommandScroll.Font.Bold = ScrollLockEnd Sub
2023-09-18 15:58:121

按“Alt”再加小键盘数字键出字是怎么回事?

Alt加小键盘数字其实用的是ASCII代码,是计算机内码的一种。从0到127分别代表不同的常用字母或符号。比如你在QQ中输入alt+29482的话,就会出来一个“猪”字,然而你在这个地方输入的话,会出现*,这是针对各个程序或者网站、系统,所采用的不同的编码来定的。ASCII码表
2023-09-18 15:58:221

有一种代码,按住ALT再加小数字键盘的若干数字就可以打出汉字的,是怎么回事

你是输入ASCII码 一般的大概编程的都知道
2023-09-18 15:58:532

易语言如何注册热键中的+,-,× ,÷

.版本 2.支持库 shellEx.支持库 spec.子程序 __启动窗口_创建完毕注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, 107) " 小键盘 “+”注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, 109) " 小键盘 “-”注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, 106) " 小键盘 “*”注册热键 (取窗口句柄 (), 标签1.取窗口句柄 (), 0, 111) " 小键盘 “/”.子程序 _标签1_反馈事件, 整数型.参数 参数一, 整数型.参数 参数二, 整数型调试输出 (参数一)
2023-09-18 15:59:032

电脑小键盘怎么开

  如何开启小键盘   电脑装上WindowsXP系统后,每次重新启动系统时,都要手工开启数字小键盘,非常不方便。那么,有哪些方法可以让系统自动开启数字小键盘呢?方法一:在 BIOS中把 NumLock项设为“Enable”,然后在BIOS中将PnPWith OS项也设置为 “Enable”即可。不过注销用户时NumLock小键盘锁是关闭的,要手工打开。方法二:另外,仅需要对“Config.sys”文件动点“小手术”即可达到此目的。设置方法如下:一、单击“开始”菜单中的“运行”命令,然后在“打开”框中键入“sysedit”,按下回车键,打开 “系统配置编辑程序”窗口。二、单击“Config.sys”标题栏,将它切换为当前编辑窗口,然后在编辑区中键入 “NumLock=ON”命令。 (韩 欣)   IE地址栏妙用两则   一、快速运行程序:在IE地址栏中直接输入要运行的程序的绝对路径,然后按Enter键就可以了。例如我们要运行记事本程序notepad.exe,在地址栏中输入C:windowsnotepad.exe,然后按回车键,记事本就会出现了。二、快速定位到地址栏:只要按下Alt+D或F6键就可以将光标定位到地址栏,无需鼠标点击地址栏就可以定位光标,这样输入网站地址就会快多了   NumLock键(小键盘灯)开机自动处于开启状态:   有的人装完系统后发现小键盘灯不是开机自动启动,每次输密码都要手动开启,即使不输密码,也和不方便.怎样解决启动Windows XP进入登录欢迎界面时,自动开启小键盘NumLock的问题呢?   方法一:在BIOS中把NumLock项设为Enable,然后在BIOS中将PnP With OS项亦设为Enable即可。不过注销用户时NumLock小键盘锁是关闭的,要手工打开。   之后打开注册表编辑器,找到HKEY_USERS.DEFAULTControl PanelKeyboard,将它下面的InitialKeyboardIndicators的"键值改为“2”,退出注册表编辑器,重新启动计算机,你就会发现数字小键盘的灯不再熄灭了。   方法二:   在config.sys文件添加开机启动小键盘灯的命令即可解决问题。方法如下:   1.单击“开始”菜单中的“运行”命令,然后在“打开”框中键入“sysedit”,按下回车键,打开“系统配置编辑程序”窗口。   2.单击“Config.sys”标题栏,将它切换为当前编辑窗口,然后在编辑区中键入“NumLock=ON”这一行命令。   3.保存修改并关闭“系统配置编辑程序”窗口。   方法三、新建一个文本文档,(别告诉我你不会啊 OTZ),写入如下代码   set WshShell=CreateObject("WScript.shell")   WshShell.SendKeys"{NUMLOCK}"   保存文件后,名称任意(别重复即可),修改扩展名位“vbs”,双击,重启,哈哈,是不是乖乖的每次自动亮啊 ?
2023-09-18 15:59:241

键盘每个键的代码是什么?

如果你说的是ASCII码的话dec(十进制) hex(十六进制) char(字符) code(控制码) c 程序(转义) 0 00   nul ("") 1 01   soh   2 02   stx   3 03   etx   4 04   eot   5 05   enq   6 06   ack   7 07   bel ("a") 8 08   bs ("") 9 09   ht (" ") 制表键10 0a   lf (" ") 换行11 0b   vt ("v") 12 0c   ff ("f") 13 0d   cr (" ") 回车14 0e   so   15 0f   si   16 10   dle   17 11   dc1   18 12   dc2   19 13   dc1   20 14   dc4   21 15   nak   22 16   syn   23 17   etb   24 18   can   25 19   em   26 1a   sub   27 1b   esc   28 1c   fs   29 1d   gs   30 1e   rs   31 1f   us   32 20 (space,空格)     33 21 !     34 22 "     35 23 #     36 24 $     37 25 %     38 26 &     39 27 "  //   40 28 (     41 29 )     42 2a *     43 2b +     44 2c ,     45 2d -     46 2e .     47 2f /     48 30 0     49 31 1     50 32 2     51 33 3     52 34 4     53 35 5     54 36 6     55 37 7     56 38 8     57 39 9     58 3a :     59 3b ;     60 3c <     61 3d =     62 3e >     63 3f ?     64 40 @     65 41 a     66 42 b     67 43 c     68 44 d     69 45 e     70 46 f     71 47 g     72 48 h     73 49 i     74 4a j     75 4b k     76 4c l     77 4d m     78 4e n     79 4f o     80 50 p     81 51 q     82 52 r     83 53 s     84 54 t     85 55 u     86 56 v     87 57 w     88 58 x     89 59 y     90 5a z     91 5b [     92 5c   ("\") 93 5d ]     94 5e ^     95 5f _     96 60 `     97 61 a     98 62 b     99 63 c     100 64 d     101 65 e     102 66 f     103 67 g     104 68 h     105 69 i     106 6a j     107 6b k     108 6c l     109 6d m     110 6e n     111 6f o     112 70 p     113 71 q     114 72 r     115 73 s     116 74 t     117 75 u     118 76 v     119 77 w     120 78 x     121 79 y     122 7a z     123 7b {     124 7c |     125 7d }     126 7e ~     127 7f   del  
2023-09-18 15:59:341

WarKey1.07里小键盘数字键的代码是什么?

在C语言里,电脑的0-9,用ASCII码表示就是48-57,是一一对应的。
2023-09-18 15:59:401

键盘上ESC下面的个键叫什么键 代码是多少

http://www.weste.net/tools/ASCII.asp查出来是96。
2023-09-18 15:59:562

魔兽争霸里的小键盘怎么修改

点ESC 然后点设置那 看看就明白
2023-09-18 16:00:319

电脑的小键盘怎么打开?

小键盘上有个NumLock的按键(小键盘左上角),按一下,键盘上的显示灯,从左数第一个会亮,这时候就可以使用小键盘输入了。
2023-09-18 16:00:502

小键盘5在哪里

用你任意一根手指或脚趾或其他任何事物将您小键盘上一个有“5”字样的键盘轻轻的按下去,就好了。暂时使用,按住笔记本左下角Windows键附近的FN键再点击键盘右边标有数字的按键即可。长久使用,按住FN键按在按NUM键,NUM键一般在最上面一排。需要关闭长久使用方法一样。<在“开始菜单”里,点“运行”,输入regedit,这是注册表,第二个文件夹,也就是HKEY_CURRENT_USER,进ConsolePanelKeyboard,那里有三个选项。第一个数字是小键盘开机锁定与否,第二个是键盘延时,第三个是键盘反映速度。把第一个选项中的数字改为2,就能让小键盘开机时就启用。开机,在输入密码的那个步骤,按一下小键盘锁,使小键盘处于启用状态。然后直接点关机选择重新启动。以后再开机,那个小键盘都是直接处于启用状态。对于2000或者XP操作系统,登陆前NUMLOCK默认为关闭,此为正常现象,若用户需要此功能,则需更改注册表,开始—>运行—>Regedit,找到键值EY_Current_UserControlPanelKeyboard,双击右侧的InitialKeyboardIndicators,将其键值改成1即可。值得注意的是,该NUMLOCK的状态将保留关机前的NUMLOCK的状态,即如果关机前关闭了NUMLOCK,下次开机时会保持此关闭的状态。开机按住DEL键,进入BIOS设置程序中的“AdvancedBIOSFeatures”项,默认情况下,“NumLock”的状态被设置为“OFF”,此时将“BOOTUpNumLockStatus”的设置更改为“On”后,保存BIOS设置就可以了。以后启动计算机后就可以直接用小键盘输入数字了。把下面的代码保存成VBS脚本文件并运行它。
2023-09-18 16:01:071

c语言怎样实现键盘操作?

都不用按键盘了,那直接把1这个参数写在代码里不就行了...
2023-09-18 16:01:183

怎样在电脑上打数字序号(如在1,2,3每一个数字外面再加一个圆圈)?

中文输入法中输入需要的数字全拼,下面的备选选项中往往有带圈选项,直接选择即可。
2023-09-18 16:01:285

为什么按住AIT键后输入用小键盘一些数字会出现一些符号或数字?

ASCII码
2023-09-18 16:02:364

VB中键盘每个按键所对应的具体数值是?例如:enter是对应13.

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小键盘/键
2023-09-18 16:02:431

用vbs来按键盘的代码,急急急,在线等!!!!

Set oScrShell = WScript.CreateObject("WScript.Shell")oScrShell.sendkeys "^{ESC}"‘发送Windows键其他:BACKSPACE{BACKSPACE}, {BS}, or {BKSP}  BREAK{BREAK}  CAPS LOCK{CAPSLOCK}  DEL or DELETE{DELETE} or {DEL}  DOWN ARROW{DOWN}  END{END}  ENTER{ENTER} or ~  ESC{ESC}  HELP{HELP}  HOME{HOME}  INS or INSERT{INSERT} or {INS}  LEFT ARROW{LEFT}  NUM LOCK{NUMLOCK}  PAGE DOWN{PGDN}  PAGE UP{PGUP}  PRINT SCREEN{PRTSC}  RIGHT ARROW{RIGHT}  SCROLL LOCK{SCROLLLOCK}  TAB{TAB}  UP ARROW{UP}  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} SHIFT +  CTRL ^  ALT %
2023-09-18 16:02:521

各位编程大神,谁知到键盘上数字键旁边的那个方向键的ASCII代码?

绝好资料,ASCIIhttp://wenku.baidu.com/view/953d32a20029bd64783e2cea.html
2023-09-18 16:03:213

澄海3C改键器的使用方法

我一般用的warkey显血改建工具,改建一般只需要把小键盘的3个键改到主键盘上就可以了,这里需要查主键盘的代码,主键盘有3个键位比较适合改建,S,Z,~(主键盘1左边那个键)。这里说下改建步骤,先打开改建工具,点左上角的File,选自定义英雄和英雄包裹的快捷键,在弹出的对话框里的包裹快捷键中,把原来的代码改成主键盘具体键位的代码,里面有查代码的网址,你可以去查。我一般是把小键盘的7改成主键盘的S键,也就是在“数字7”后面的框里把代码改成83(S键的代码),小键盘的1也就是“数字1”改成90(Z键代码),小键盘的8也就是“数字8”改成192(~键代码)。改完后点“保存并退出此界面”,然后把改建器最小化,记住不能退出去。再进入游戏,在游戏开始后按Scroll Lock就改键了,也就是现在你按S键的话,就是按的小键盘的1键,用道具方便多了,这里改键器还有个功能也很有用的,就是显血条,不需要按ALT键,这里你只需进入游戏后按Home和End就可以了,Home表示打开显示己方成员的血条,End表示打开显示对方成员的血条。需要关闭的话再按下Home和End就可以了。
2023-09-18 16:03:461

klb-mcd1-01a小键盘清故障

用UP键进行数据设定更改。1、表示系统故障复位命令,此时按SET键保存,清除当前系统故障,然后自动切换到F0的数据菜单显示。2、表示显示故障时间代码,此时按SET键,将循环显示11条故障记录的故障代码以及故障时间,按PRG退出。
2023-09-18 16:03:541

C#代码,运用button控制键盘。

触发键盘做什么?
2023-09-18 16:04:041

按键精灵 基本命令中的 键盘ASCII码 a-z 1-0 F1-F12详细的进C语言高手解答

A 键到 Z 键与其 ASCII 码的相应值 "A " 到 "Z " 是一致的 常数 值 描述 vbKeyA 65 A 键 vbKeyB 66 B 键 vbKeyC 67 C 键 vbKeyD 68 D 键 vbKeyE 69 E 键 vbKeyF 70 F 键 vbKeyG 71 G 键 vbKeyH 72 H 键 vbKeyI 73 I 键 vbKeyJ 74 J 键 vbKeyK 75 K 键 vbKeyL 76 L 键 vbKeyM 77 M 键 vbKeyN 78 N 键 vbKeyO 79 O 键 vbKeyP 80 P 键 vbKeyQ 81 Q 键 vbKeyR 82 R 键 vbKeyS 83 S 键 vbKeyT 84 T 键 vbKeyU 85 U 键 vbKeyV 86 V 键 vbKeyW 87 W 键 vbKeyX 88 X 键 vbKeyY 89 Y 键 vbKeyZ 90 Z 键 0 键到 9 键与其 ASCII 码的相应值 "0 " 到 "9 " 是一致的 常数 值 描述 vbKey0 48 0 键 vbKey1 49 1 键 vbKey2 50 2 键 vbKey3 51 3 键 vbKey4 52 4 键 vbKey5 53 5 键 vbKey6 54 6 键 vbKey7 55 7 键 vbKey8 56 8 键 vbKey9 57 9 键 数字小键盘上的键 常数 值 描述 vbKeyNumpad0 96 0 键 vbKeyNumpad1 97 1 键 vbKeyNumpad2 98 2 键 vbKeyNumpad3 99 3 键 vbKeyNumpad4 100 4 键 vbKeyNumpad5 101 5 键 vbKeyNumpad6 102 6 键 vbKeyNumpad7 103 7 键 vbKeyNumpad8 104 8 键 vbKeyNumpad9 105 9 键 vbKeyMultiply 106 乘号 (*) 键 vbKeyAdd 107 加号 (+) 键 vbKeySeparator 108 ENTER 键(在数字小键盘上) vbKeySubtract 109 减号 (-) 键 vbKeyDecimal 110 小数点 (.) 键 vbKeyDivide 111 除号 (/) 键 功能键 常数 值 描述 vbKeyF1 112 F1 键 vbKeyF2 113 F2 键 vbKeyF3 114 F3 键 vbKeyF4 115 F4 键 vbKeyF5 116 F5 键 vbKeyF6 117 F6 键 vbKeyF7 118 F7 键 vbKeyF8 119 F8 键 vbKeyF9 120 F9 键 vbKeyF10 121 F10 键 vbKeyF11 122 F11 键 vbKeyF12 123 F12 键 vbKeyF13 124 F13 键 vbKeyF14 125 F14 键 vbKeyF15 126 F15 键 vbKeyF16 127 F16 键比如:想要按a键一次。按键精灵7 :KeyPress 65,1 按键精灵8:KeyPress “a”,1
2023-09-18 16:04:191

我想知道我的笔记本的小键盘怎么开启啊

你试试FN+F11!希望能帮到你。
2023-09-18 16:04:295

如何用键盘输入III

用图片说话,选择数字,既可输入
2023-09-18 16:05:012

如何用按键精灵做一个按键代替两个键同时按下的脚本?

把下面的代码复制下来,然后打开记事本粘贴进去,随便起个名字保存。把保存的文件复制到按键精录安装目录下的Script文件夹里。运行按键按F7启动脚本。(如果你会用按键新建脚本就可以从[Script]开始往下复制,然后粘贴到脚本里。)[General] Description=按1启动Alt+F4 BeginHotkey=118 BeginHotkeyMod=0 PauseHotkey=0 PauseHotkeyMod=0 StopHotkey=123 StopHotkeyMod=0 RunOnce=1 EnableWindow= Enable=1 AutoRun=0 [Repeat] Type=0 Number=1 [Relative] SetupOCXFile= [Comment] Content= [Script] //说明:97是小键盘1的代码,49是大键盘1的代码。 //18是Alt键,115是F4键。 Rem 开始 WaitKey Pkey //等待按键,并把你按的键值保存到变量Pkey中。 If Pkey =97 or Pkey=49 //如果键值等于97或49,就是说如果你按的是小键盘1或大键盘1,就执行下面的代码。 KeyDown 18,1 //按下ALT键 KeyPress 115,1 //按一下F4键 KeyUp 18,1 //弹起ALT键 EndIf Goto 开始//Goto 开始,这句的作用是反回到“rem 开始”处循环运行。//不按F12脚本不会停止。//说到这程度如果你还不明白那谁也没有办法了。
2023-09-18 16:05:231

vb6模拟键盘输入的代码是什么?

用下面代码可以显示键盘所有ASCII码 Private Declare Function GetWindowThreadProcessId& Lib "user32" (ByVal hwnd As Long, lpdwProcessId As Long)Private Declare Function GetKeyboardLayout& Lib "user32" (ByVal dwLayout As Long)Private Declare Function MapVirtualKeyEx Lib "user32" Alias "MapVirtualKeyExA" (ByVal uCode As Long, ByVal uMapType As Long, ByVal dwhkl As Long) As LongPrivate Function CharFromKeyCode(k As Integer) As StringDim s As StringSelect Case kCase vbKeyBack: s = "BackSpace"Case vbKeyTab: s = "Tab"Case vbKeyClear: s = "Clear"Case vbKeyReturn: s = "Enter"Case vbKeyShift: s = "Shift"Case vbKeyControl: s = "Ctrl"Case vbKeyMenu: s = "Alt"Case vbKeyPause: s = "Pause"Case vbKeyCapital: s = "CapsLock"Case vbKeyEscape: s = "ESC"Case vbKeySpace: s = "SPACEBAR"Case vbKeyPageUp: s = "PAGE UP"Case vbKeyPageDown: s = "PAGE DOWN"Case vbKeyEnd: s = "END"Case vbKeyHome: s = "HOME"Case vbKeyLeft: s = "LEFT ARROW"Case vbKeyUp: s = "UP ARROW"Case vbKeyRight: s = "RIGHT ARROW"Case vbKeyDown: s = "DOWN ARROW"Case vbKeySelect: s = "SELECT"Case vbKeyPrint: s = "PRINT SCREEN"Case vbKeyExecute: s = "EXECUTE"Case vbKeySnapshot: s = "SNAPSHOT"Case vbKeyInsert: s = "INS"Case vbKeyDelete: s = "DEL"Case vbKeyHelp: s = "HELP"Case vbKeyNumlock: s = "NUM LOCK"Case vbKey0 To vbKey9: s = Chr$(k)Case vbKeyA To vbKeyZ: s = Chr$(MapVirtualKeyEx(k, 2, GetKeyboardLayout(GetWindowThreadProcessId(GetForegroundWindow, 0))))Case vbKeyF1 To vbKeyF16: s = "F" & CStr(k - 111)Case vbKeyNumpad0 To vbKeyNumpad9: s = "Numpad " & CStr(k - 95)Case vbKeyMultiply: s = "Numpad {*}"Case vbKeyAdd: s = "Numpad {+}"Case vbKeySeparator: s = "Numpad {ENTER}"Case vbKeySubtract: s = "Numpad {-}"Case vbKeyDecimal: s = "Numpad {.}"Case vbKeyDivide: s = "Numpad {/}"Case Elses = Chr$(MapVirtualKeyEx(k, 2, GetKeyboardLayout(GetWindowThreadProcessId(GetForegroundWindow, 0))))End SelectCharFromKeyCode = sEnd FunctionPrivate Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)Dim s As Strings = "KeyCode " & KeyCodes = s + " " & CharFromKeyCode(KeyCode)If Shift = vbShiftMask Then s = s & " + Shift "If Shift = vbCtrlMask Then s = s & " + Ctrl "If Shift = vbAltMask Then s = s & " + Alt "Print vbCrLf & s & " Down "End Sub
2023-09-18 16:06:071