Function Text_Trigger(ByVal Item)
Dim A,B,C,D
Set A=HMIRuntime.Tags("PLC_4$Program/DB_PLC_TO_HMI.MCD_MODE")
Set B=HMIRuntime.Tags("PLC_4$Program/DB_PLC_TO_HMI.TROLLEY_MODE")
Set C=HMIRuntime.Tags("PLC_4$Program/DB_PLC_TO_HMI.CLAMP_MODE")
Set D=HMIRuntime.Tags("PLC_4$Program/DB_PLC_TO_HMI.CLEAN_MODE")
A.Read
B.Read
C.Read
D.Read
Dim SR
Set SR=ScreenItems("SR")
If A.Value=1 Then
SR.Text="MAIN CONTROL DESK"
End If
If B.Value=1 Then
SR.Text="TROLLEY DESK"
End If
If C.Value=1 Then
SR.Text="FIXING CLAMP STAND"
End If
If D.Value=1 Then
SR.Text="CLEANING STAND"
End If
End Function
运行的时候进行方式选择，在画面上没有变化！请教高手指点！万分感谢！
问题补充：
想请问下学长触发变量是不是就是要求连接的变量？
另外怎么保证是静态文本，如果是组中的一个元素行不行？
最佳答案
一楼说的没错，教你一个好用的调试VBS的方法，就是多添加几个
MsgBox "OKn"(n=1,2,3......)
这样就可以看到究竟程序停在什么地方了
提问者对于答案的评价：
谢谢大家的帮助！
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc276822.html
微信扫一扫 
支付宝扫一扫 