[求助]键值问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]键值问题

共有1975人关注过本帖树形打印复制链接主题：[求助]键值问题

pcxjxjhkw

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1791 积分：12764 威望：0 精华：1 注册：2013/7/18 15:51:00

[求助]键值问题 发帖心情

Post By：2017/1/14 15:44:00 [只看该作者]

键盘上每个键是否有一个唯一的键值？

如：keys.F1.id

谢

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/1/14 15:48:00 [只看该作者]

http://www.foxtable.com/webhelp/scr/0621.htm

msgbox(Keys.F1)

pcxjxjhkw

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1791 积分：12764 威望：0 精华：1 注册：2013/7/18 15:51:00

Post By：2017/1/14 15:58:00 [只看该作者]

dvubb 此主题相关图片如下：qq截图20170114155424.png

如何实现：根据上面窗口设置，单击添加时，添加全局快捷键？

Dim obj As GlobalKeyDown = GlobalKeyDown.getInstance
RegisterHotKey(obj.Handle, 1000, KeyModifiers.Control, Keys.F1) ' 快捷键F1

最头疼的问题：如何将窗口中【快捷键】的值转换为代码中红色的部分？

谢

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110574 积分：562760 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/1/14 16:13:00 [只看该作者]

Dim key = [Enum].Parse(Gettype(Keys), "F1")

RegisterHotKey(obj.Handle, 1000, KeyModifiers.Control, key)

pcxjxjhkw

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1791 积分：12764 威望：0 精华：1 注册：2013/7/18 15:51:00

Post By：2017/1/14 16:14:00 [只看该作者]

谢

主题：[求助]键值问题