易语言如何分割数字然后模拟键盘一个个输入?
2个回答
展开全部
.版本 2
.支持库 spec
.支持库 eAPI
.程序集 窗口程序集1
.程序集变量 长度, 整数型
.程序集变量 a, 整数型
.程序集变量 X, 整数型
.子程序 _按钮1_被单击
a = 1
长度 = 取文本长度 (编辑框1.内容)
.计次循环首 (长度, )
调用子程序 (&子程序1, , , )
.计次循环尾 ()
.子程序 子程序1
X = 到整数 (取文本中间 (编辑框1.内容, a, 1))
.如果真 (X = 1)
模拟按键 (#键1, , )
.如果真结束
.如果真 (X = 2)
模拟按键 (#键2, , )
.如果真结束
.如果真 (X = 3)
模拟按键 (#键3, , )
.如果真结束
.如果真 (X = 4)
模拟按键 (#键4, , )
.如果真结束
.如果真 (X = 5)
模拟按键 (#键5, , )
.如果真结束
.如果真 (X = 6)
模拟按键 (#键6, , )
.如果真结束
.如果真 (X = 7)
模拟按键 (#键7, , )
.如果真结束
.如果真 (X = 8)
模拟按键 (#键8, , )
.如果真结束
.如果真 (X = 9)
模拟按键 (#键9, , )
.如果真结束
a = a + 1
.支持库 spec
.支持库 eAPI
.程序集 窗口程序集1
.程序集变量 长度, 整数型
.程序集变量 a, 整数型
.程序集变量 X, 整数型
.子程序 _按钮1_被单击
a = 1
长度 = 取文本长度 (编辑框1.内容)
.计次循环首 (长度, )
调用子程序 (&子程序1, , , )
.计次循环尾 ()
.子程序 子程序1
X = 到整数 (取文本中间 (编辑框1.内容, a, 1))
.如果真 (X = 1)
模拟按键 (#键1, , )
.如果真结束
.如果真 (X = 2)
模拟按键 (#键2, , )
.如果真结束
.如果真 (X = 3)
模拟按键 (#键3, , )
.如果真结束
.如果真 (X = 4)
模拟按键 (#键4, , )
.如果真结束
.如果真 (X = 5)
模拟按键 (#键5, , )
.如果真结束
.如果真 (X = 6)
模拟按键 (#键6, , )
.如果真结束
.如果真 (X = 7)
模拟按键 (#键7, , )
.如果真结束
.如果真 (X = 8)
模拟按键 (#键8, , )
.如果真结束
.如果真 (X = 9)
模拟按键 (#键9, , )
.如果真结束
a = a + 1
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询