恭喜,你发布的帖子
发布于 2018-12-29 11:21:31
5楼
VBS上手比较块一点:
Function Text_Trigger(ByVal Item)
Dim A,B
Dim tag1,tag2
Set tag1 = HMIRuntime.Tags("A")
tag1.Read
A = tag1.value
Set tag2 = HMIRuntime.Tags("B")
tag2.Read
B = tag2.value
If A =1 Then
Text_Trigger = "aaa"
End If
If B=1 Then
Text_Trigger = "bbb"
End If
If A=1 And B=1 Then
Text_Trigger = "ccc"
end if
End Function
请填写推广理由:
分享
只看
楼主