求一个按键精灵数字累加的脚本

Question

在文本框手动输入一个数字后(数字开头有时候带一个英文例如：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

Answer 1

提供思路给你把：设置3个文本框，文本框1内容=文本框2内容+文本框3内容
文本框2内容=A 文本框3内容=n+1 这样你按下PuGp键就让n+1，然后 文本框1内容=文本框2内容+文本框3内容 就可以了。追问

这样不行，因为开头的数字频繁的要换。每次要换都得打开脚本界面填内容太麻烦了。