【有源码】按键和键码换转（完全公开）【TC1.0】

小风子

无聊写一下，不足之处多多包涵。 不设隐藏了，希望大家多给点意见。

说明：由于时间仓促，此脚本只适合F1-F12互转；我想大家应该有点帮助。
不说看代码:

1. 空间 我的程序
   
2. 整型 键码,测试,线程句柄   
   
3. 字符型 按键,a,b,c,d
   
4. 功能 整型 按键转换()
   
5. //以下是用按键码来获取有字符输入要与键盘一致
   
6. 按键=编辑框.获得文本("编辑框0")
   
7. 如果(单选框.获得状态("单选框1"))
   
8.         如果(字符串.长度(按键)==0)
   
9.                 辅助.消息框("请输入按键或按键码")
   
10.                 线程.关闭(线程句柄)
    
11.         否则
    
12.                 c=字符串.移除(按键,1)
    
13.                 键码=转换.字符型转整型(c)+111
    
14.         如果(键码>=112&&键码<=123)
    
15.                 a=字符串.连接(" ",转换.整型转字符型(键码))
    
16.                 b=字符串.连接(按键,a)
    
17.                 辅助.消息框(b)
    
18.         否则
    
19.                 辅助.消息框("请输入F1-F12按键")
    
20.                 线程.关闭(线程句柄)
    
21.         如果结束        
    
22.         如果结束
    
23. 否则
    
24.         如果(单选框.获得状态("单选框0"))
    
25. //以下是用按键码来获取F1-F12按键
    
26.                 如果(字符串.长度(按键)==0)
    
27.                         辅助.消息框("请输入按键或按键码")
    
28.                         线程.关闭(线程句柄)
    
29.                 否则
    
30.                         键码=转换.字符型转整型(按键)               
    
31.                         如果(键码>=112&&键码<=123)
    
32.                                 测试=键码-111
    
33.                         a=字符串.连接("F",转换.整型转字符型(测试))
    
34.                         b=字符串.连接(a," ")
    
35.                         d=字符串.连接(b,按键)
    
36.                         辅助.消息框(d)
    
37.                         否则
    
38.                                 辅助.消息框("请输入F1-F12按键码")
    
39.                                 线程.关闭(线程句柄)
    
40.                         如果结束
    
41.                 如果结束
    
42.         否则
    
43.                 辅助.消息框("请选择转换方式")
    
44.                 线程.关闭(线程句柄)
    
45.         如果结束
    
46. 如果结束        
    
47. 返回 0
    
48. 功能结束
    
49. 功能 逻辑型 开始_点击()  
    
50. 线程句柄=线程.开启("我的程序.按键转换")
    
51. 
    
52. 返回 真   
    
53. 功能结束  
    
54. 功能 逻辑型 退出_点击()  
    
55. 线程.关闭(线程句柄)
    
56. 辅助.退出()
    
57. 返回 真   
    
58. 功能结束  
    
59. 空间结束     
    

复制代码

更新地址：【源码】键盘按键码查询

tianyu888

tclhs

我复制代码说12行有错误

wenjoyee

强啊

scj2zxy

狠给力

子仔工作室

:smoke牛B

wavelife

收藏以后有用。。

智盛辅助软件

顶  起

bacens38

116546456

v11ks

看不懂 记录先