WINCC 6.2怎么用VB脚本改变指示灯的颜色，如运行反馈是绿色，故障反馈是红色，停止时蓝色，脚本怎么写啊
问题补充：
如果要是闪烁，怎么写VB，运行，故障时闪烁，停止不闪烁
最佳答案
Function FillColor_Trigger(ByVal Item)
Dim AA
Set AA = HMIRuntime.Tags("AA")
Dim bb
Set bb = HMIRuntime.Tags("bb")
Dim FF
Set FF = ScreenItems("圆1")
If AA.Read = 1 Then
FF.BackColor = RGB(255,0,0)
Else If bb.Read = 1 Then
FF.BackColor = RGB(0,128,0)
Else If AA.Read = 0 And bb.Read = 0 Then
FF.BackColor = RGB(0,0,255)
End If
End If
End If
End Function
代码如上，其中AA是故障反馈变量，bb是运行反馈信号变量 圆1 是我画的一个圆代表指示灯。如图，在圆的属性---颜色---填充颜色的 动态中写VB脚本。
图片说明：
提问者对于答案的评价：
管用
专家置评
已阅，最佳答案正确。
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc212618.html
微信扫一扫 
支付宝扫一扫