自定义快捷键、键值注册热键

全部代码写完，这是自定义快捷键的雏形，如果要添加新功能可以自己完善代码

' 因为功能键文本是程序集变量，所以先清空
.如果 (选择框1.选中 ＝ 假 且 选择框2.选中 ＝ 假 且 选择框3.选中 ＝ 假)
信息框 (“必须选择一个功能键。”, #信息图标, )
.否则
.如果 (组合框1.内容 ＝ “”)
信息框 (“必须选择字符键。”, #信息图标, )
.否则
.如果真 (选择框1.选中 ＝ 真)
功能键 ＝ 功能键 ＋ 1
功能键文本 ＝ 功能键文本 ＋ “Ctrl+”
.如果真结束
.如果真 (选择框2.选中 ＝ 真)
功能键 ＝ 功能键 ＋ 2
功能键文本 ＝ 功能键文本 ＋ “Shift+”
.如果真结束
.如果真 (选择框3.选中 ＝ 真)
功能键 ＝ 功能键 ＋ 4
功能键文本 ＝ 功能键文本 ＋ “Alt+”
.如果真结束
字符键 ＝ 取代码 (组合框1.内容, )
功能键文本 ＝ 功能键文本 ＋ 组合框1.内容
.如果真 (是否已注册 ＝ 真)
撤销热键 (_启动窗口.取窗口句柄 (), 注册热键)
.如果真结束
' 如果已注册过热键，就先撤销热键再注册
注册热键 ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 功能键, 字符键)
.如果 (注册热键 ＝ 0)
信息框 (“注册热键” ＋ 功能键文本 ＋ “失败。”, #信息图标, )
.否则
是否已注册 ＝ 真
信息框 (“注册热键” ＋ 功能键文本 ＋ “成功。”, #信息图标, )