求一个按键精灵数字累加的脚本 30
在文本框手动输入一个数字后(数字开头有时候带一个英文例如:A1234),按一次键盘上的PuGp键就自动累加一次变成A1235再自动按一下回车键。再按PuGp键一次就变成A...
在文本框手动输入一个数字后(数字开头有时候带一个英文例如:A1234),按一次键盘上的PuGp键就自动累加一次变成A1235再自动按一下回车键。再按PuGp键一次就变成A1236按一次回车...以此类推。
万分感谢
大致想要的功能我自己做出来了,希望懂的朋友帮我修改一下。现在的问题是数据后第三位如果是0不就会出问题。例如:A12345运行一次脚本,会得出A12346。但是A12001,会得出A122。0开头脚本计算会把0省去。有什么办法修改一下吗?
KeyDown 17, 1
KeyPress 65, 1
KeyUp 17, 1
//全选内容
KeyDown 17, 1
KeyPress 67, 1
KeyUp 17, 1
Delay 100
//复制内容
Dim i
//定义变量i
Clipboard = Plugin.Sys.GetCLB()
//获得剪切板内容
i = Cint(Right(Clipboard, 3)) + 1
//i=获取剪贴板后3位+1
Call Plugin.Sys.SetCLB(i)
//这时剪切板内容为i
KeyPress "right", 3
Delay 100
KeyPress "BackSpace", 3
//删除输入框数据后三位
Delay 100
KeyDown 17, 1
KeyPress 86, 1
KeyUp 17, 1
//粘贴内容i 展开
万分感谢
大致想要的功能我自己做出来了,希望懂的朋友帮我修改一下。现在的问题是数据后第三位如果是0不就会出问题。例如:A12345运行一次脚本,会得出A12346。但是A12001,会得出A122。0开头脚本计算会把0省去。有什么办法修改一下吗?
KeyDown 17, 1
KeyPress 65, 1
KeyUp 17, 1
//全选内容
KeyDown 17, 1
KeyPress 67, 1
KeyUp 17, 1
Delay 100
//复制内容
Dim i
//定义变量i
Clipboard = Plugin.Sys.GetCLB()
//获得剪切板内容
i = Cint(Right(Clipboard, 3)) + 1
//i=获取剪贴板后3位+1
Call Plugin.Sys.SetCLB(i)
//这时剪切板内容为i
KeyPress "right", 3
Delay 100
KeyPress "BackSpace", 3
//删除输入框数据后三位
Delay 100
KeyDown 17, 1
KeyPress 86, 1
KeyUp 17, 1
//粘贴内容i 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询