按键精灵绑定组态王变量
作者:互联网
i = 1
For 50
Call 一组循环()
Plugin.Msg.Tips("预计还剩"&((50-i)*t)&"秒")
i=i+1
Next
/**********************************************
注意事项:
1.绑定的输入输出数据为同1名称(再做的时候用块做好保证整齐,后面就不用调整了,从上到下 从左到右)
名称的最大值最小值得设置好
2.本例程替换和空白坐标手动设置的,移动好位置在移动,替换的时候选择第一个数据开始替换
PS:如果是多项单选框,例如顶升脱开模式选择,先把自带的 选中→格式→删除空白→合成一行(ctrl+shift+J)
然后把要设置的模式也缩写成一行然后批量替换即可,最后再只需要替换绑定的数据
*/////////////////////////////////////////////////
Function 一组循环()
//替换按钮 1543,403
//空白 1400,390
a=now()
Call 替换文本("N1位移输入[")
Call 替换文本("N2位移输入[")
Call 替换文本("N3位移输入[")
Call 替换文本("N4位移输入[")
Call 替换文本("N1压力输入[")
Call 替换文本("N2压力输入[")
Call 替换文本("N3压力输入[")
Call 替换文本("N4压力输入[")
Call 替换文本("升降位移输入[")
Call 替换文本("推拉位移输入[")
Call 替换文本("纠偏位移输入[")
Call 替换文本("顶升脱开位移设置[" & i & "]-升降位移输入[")
Call 替换文本("升降位移输入[" & i & "]-下降脱开位移设置[")
Call 替换文本("实际吨位[")
b = now()
t=DateDiff("s",a,b)
End Function
Function 移动点击(x,y)
MoveTo x,y
Delay 300
LeftClick 1
Delay 200
End Function
Function 点击空白文本并输入(c)
Call 移动点击( 1400,390)
KeyPress "BackSpace", 1
Delay 200
SayString c & i&"]"
End Function
Function 替换文本(b)
Call 点击空白文本并输入(b)
For 1 //替换二次,输入输出--------1 循环一次只输出,循环2次,有输入输出
Call 移动点击(1543, 403)
Delay 500
Next
End Function
标签:绑定,点击,组态王,按键精灵,Call,位移,文本,替换,输入 来源: https://www.cnblogs.com/zjwgy/p/15168989.html