Foxtable(狐表)用户栏目专家坐堂 → [求助]如何监控键盘?


  共有163人关注过本帖树形打印复制链接

主题:[求助]如何监控键盘?

帅哥哟,离线,有人找我吗?
zto001
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:4922 威望:0 精华:0 注册:2018/10/16 11:42:00
[求助]如何监控键盘?  发帖心情 Post By:2019/10/5 18:52:00 [只看该作者]


求助,如何监控键盘?
[此贴子已经被作者于2019/10/10 13:48:15编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
zto001
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:4922 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/10/6 13:21:00 [只看该作者]

有人回没?


 回到顶部
帅哥哟,离线,有人找我吗?
zto001
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:4922 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/10/6 13:21:00 [只看该作者]

可能没办法在指定的表格或者指定的文本框内。而是其他地方

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:35369 积分:180029 威望:0 精华:8 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/6 14:34:00 [只看该作者]

试试

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=52509
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=95436
http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=139612

 回到顶部
帅哥哟,离线,有人找我吗?
zto001
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:4922 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/10/6 15:29:00 [只看该作者]


http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=139612
这个有用,谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
zto001
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:4922 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/10/10 13:50:00 [只看该作者]

我再想问问,能不能监控扫描枪扫描的数据进去?

比如判断一串数据在很短时间内输入并回车就是扫描。
不知道怎么写代码好

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:35369 积分:180029 威望:0 精华:8 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/10 14:25:00 [只看该作者]

只能判断有没有回车。判断一串数据在很短时间内输入这个没有办法处理

 回到顶部
帅哥哟,离线,有人找我吗?
zto001
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:4922 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/10/10 16:51:00 [只看该作者]

请教下,如果我需要替换掉监控键盘的字符,为什么替换不了?

Dim 数据 As String=键盘监控的输出值
数据.Replace("D","-")
数据.Replace("RShiftKey","=")
Output.Show(数据)

这是监控的数据
RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D8D6D1D9Return|RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D8D5D0D0Return|RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D8D4D3D8Return|RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D8D3D4D5Return|RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D8D2D7D3Return|RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D8D2D7D3Return|RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D8D1D2D6Return|RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D8D0D7D2Return|RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D7D9D5D5Return|RShiftKeyYRShiftKeyTD4D1D0D9D7D8D8D7D7D7D8D7D8Return|


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:35369 积分:180029 威望:0 精华:8 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/10 17:48:00 [只看该作者]

数据 = 数据.Replace("D","-")

 回到顶部
帅哥哟,离线,有人找我吗?
zto001
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:712 积分:4922 威望:0 精华:0 注册:2018/10/16 11:42:00
  发帖心情 Post By:2019/10/10 19:29:00 [只看该作者]

试过了-,也不行

 回到顶部
总数 11 1 2 下一页