官方实例是按钮触发，但是我想要做根据外部二进制变量触发。vbs语句不会编了，求大神指导，感激不尽，新年快乐。
问题补充：
感觉3L大神，但是我想问一下那你这个修改之后我触发器应该设置成什么，用不用在全局脚本里面做，我现在试了一下不动。
最佳答案
在官方事例上做了修改，脚本如下，用实际变量替换a即可：
Dim poly,lft,Val
Set poly=HMIRuntime.ActiveScreen.ScreenItems("polyline1")
poly.Index=1
lft=poly.ActualPointLeft
Set val =HMIRuntime.Tags("a")
Val.Read
If val.Value = 1 Then
ActualPointLeft_Trigger=lft+2
If lft>=598 Then
poly.ActualPointLeft=580
ActualPointLeft_Trigger=580
End If
poly.Visible=True
poly.ActivateDynamic "ActualPointLeft","CycleTime125ms"
Else
poly.Visible=False
End If
提问者对于答案的评价：
这个我试了一下，不好使，我就想问一下触发器我得选哪个，一模一样的粘进去不好用，
最佳答案作者回复:
在画面对象-其它-打开画面，添加以下ＶＢＳ脚本：
Dim poly1
Set poly1=HMIRuntime.ActiveScreen.ScreenItems("polyline1")
''poly1.Visible=True
poly1.ActivateDynamic "ActualPointLeft","CycleTime125ms"
原创文章，作者：ximenziask，如若转载，请注明出处：https://www.zhaoplc.com/plc356523.html
微信扫一扫 
支付宝扫一扫 