中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-09-25 10:41
共 47,813 主题排行 / 349,918 发帖 / 今日 0 篇 / 48,274 会员排行
DOS批处理 & 脚本技术(批处理室) » ASCII码互查(键盘键位码)→VBS版
可打印版本  3,325 / 22
第16楼 baomaboy 发表于 2007-06-11 11:40
银牌会员 发帖 554 积分 1,513
Originally posted by zhoushijay at 2007-6-11 10:26:
其实用VB做这个的代码最简单了, 只要keydown事件,它自己就会返回一个keycode 于是,代码就没什么技术含量,

Private Sub Form_KeyDown(KeyCode As Integer, Shi ...


VB做别的也许最简单吧,做这个好像怎么也看不出VB最简单。
第17楼 wert123 发表于 2007-06-11 20:45
中级用户 发帖 135 积分 301
Originally posted by baomaboy at 2007-6-11 11:40 AM:


VB做别的也许最简单吧,做这个好像怎么也看不出VB最简单。


都厉害啊~~~
第18楼 zh159 发表于 2007-06-11 21:07
金牌会员 发帖 1,467 积分 3,687
Originally posted by baomaboy at 2007-6-11 11:40:


VB做别的也许最简单吧,做这个好像怎么也看不出VB最简单。

真要简单,单独使用其实只用“<body onKeyDown='alert(event.keyCode)'>”就够了,存为*.hta很方便

“<body onKeyDown='alert(event.keyCode)'>”好像有个缺点:只能反映单一键盘,小写、上档键的字符等都无法操作
第19楼 baomaboy 发表于 2007-06-12 00:30
银牌会员 发帖 554 积分 1,513
嗯 还比如回车只是显示13而丢了10

[ Last edited by baomaboy on 2007-6-12 at 01:01 AM ]
第20楼 zh159 发表于 2007-06-12 14:20
金牌会员 发帖 1,467 积分 3,687
回车确实是13,而10是换行符号,两个不同
很多文本文件打开后是一长串的,中间有很多黑色方块,那是回车符号(13),如果有换行符号(10),就是一行行的了,而不是只有一行
第21楼 baomaboy 发表于 2007-06-12 17:58
银牌会员 发帖 554 积分 1,513
Originally posted by zh159 at 2007-6-12 14:20:
回车确实是13,而10是换行符号,两个不同
很多文本文件打开后是一长串的,中间有很多黑色方块,那是回车符号(13),如果有换行符号(10),就是一行行的了,而不是只有一行


呵呵 我说的是按键回车,应该是13+10,你的代码也是这效果吗。
第22楼 zh159 发表于 2007-06-12 18:17
金牌会员 发帖 1,467 积分 3,687
Originally posted by baomaboy at 2007-6-12 17:58:


呵呵 我说的是按键回车,应该是13+10,你的代码也是这效果吗。

我 11 楼的代码能正常将回车换行拆分为13+10(看效果图)

PS:我们在记事本里的回车后换一行这个动作其实包含了两个字符:即回车+换行(13+10),而键盘的回车输出命令只输出一个13,换行的10是软件自己加上去的;
QQ的聊天记录倒是没有加上换行符10,这你可以从QQ的聊天记录复制后粘贴到记事本中就会发现该回车换行的地方没有换行,只有一个黑色的方块:换行符
(一句话还原从QQ中复制下来的代码)
第23楼 baomaboy 发表于 2007-06-12 19:04
银牌会员 发帖 554 积分 1,513
原来如此 就因为read代码中回车时总是13+10所以才有我认可键盘的回车是13+10,

也即是说当在文本中按回车后是系统又在13后面加了10?

[ Last edited by baomaboy on 2008-3-24 at 05:18 PM ]
上一页  1 2
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023