Question

跪求按键精灵自动输入编号脚本代码

VISIO里面的元件需要便序号，全通方法是选中一个原件形状，然后按shift+a弹出属性窗口，在点击“序号”文本框，输入相应编号，从1开始到无穷尽....现在想用按键精灵自动完成，当选择一个原件图形时，自动按SHIFT+a,然后鼠标自动移到序号文本框，双击后输入编号，每个编号都按顺序，怎么弄？

Answer 1

输入编号之后呢？
你要说清楚从哪一步开始循环，比如，你是要，选一个原件输入编号1后点确认？还是按回车？确认后，又后选一个原件再输入编号2，这样无限循环？如果是这样，

a = 0
Delay 1000
Rem 从这里循环
MoveTo x, y
LeftClick 1
//上面的x,y改成你要选择的原件在屏幕对应的坐标
Delay 600
KeyDown 16, 1
KeyPress 65, 1
KeyUp 16, 1
Delay 1000
//上面的1000是指你在按Shift+a后等待多久再点序号文本框1000代表1000毫秒=1秒
MoveTo x, y
LeftDoubleClick 1
Delay 1000
//上面的1000是指你双击后等多久开始输入编号
a = a + 1
SayString a
//上面就是输入1，输入1之后又怎么操作你没说清楚我也不好写，
Delay 1000
Goto 从这里循环

启动脚本后就是1开始往后输入，如果你中间停止了脚本，再启动他就又从1开始输入。
给你一个自动循环的思路
a=0
a=a+1
SayString a
//这样a的值就等于1，然后在下面加入跳转命令
a=0
Rem 标记
a=a+1
SayString a
Goto 标记

追问

嗯 是这样的 选一个元件 然后按某个健 一键完成输入编号 ，然后接着点下一个 循环 选择是手动

追答

a = 0
Rem 循环
ac = WaitClick()
If ac = 32777 Then
a = a + 1
KeyDown 16, 1
KeyPress 65, 1
KeyUp 16, 1
//下面的延迟可以自己修改
Delay 1000
//记住，把下面的MoveTo x,y 中的 x,y改成你要双击的坐标，这个很好弄的。
MoveTo x, y
LeftDoubleClick 1
//这下面的延迟也可以自己修改
Delay 1000
SayString a
Goto 循环
Else
Goto 循环
End If

复制上面的代码到按键精灵，启动后
当你按下鼠标中键，按键精灵自动按Shift+a，等待一秒(如果你的电脑反应很快，你可以把延迟改小)，然后鼠标自动移动到你要的位置双击，等待一秒钟，然后输入1，当你第二次按下鼠标中键后则重复上面的动作，不过输入的内容就变成了2，以此类推。
如果你要从5开始输入，你就把a=0，改成a=4

Answer 2

晕s
什么热键设置啊
这是个后台按f1f2f3f4的脚本
参数自己改
后面的数字其实也就是按键码
鼠标命令中可以查找
//下面这句是得到当前最前面的窗口句柄
plugin
hwnd
=
window.foreground()
rem
m
plugin
bgkm5.keyclick(hwnd,112)
//112代码f1
delay
10
//防止太快
无效
plugin
bgkm5.keyclick(hwnd,113)
//112代码f2
delay
10
//防止太快
无效
plugin
bgkm5.keyclick(hwnd,114)
//112代码f3
delay
10
//防止太快
无效
plugin
bgkm5.keyclick(hwnd,115)
//112代码f4
delay
10
goto
m

Answer 3

随便弄