younthue
級別: 探索解密
![]() |
我創建了一個畫面窗口,在畫面窗口內做了一個小圓形指示燈,想用這個小圓形根據PLC變量的值變換顏色,VBS代碼如下,運行結果顏色不變,全局顏色方案已設置為否。請幫忙看看是哪里有問題?謝謝! Function BackColor_Trigger(ByVal Item) Dim R69 Dim objCircle Set R69=HMIRuntime.Tags("069HtrDrv1Sts") Set objCircle=hmiruntime.Screens("ILO2").ScreenItems("圓1") R69.Read If R69.Value=4 Then objCircle.BackColor=vbRed Else objCircle.BackColor=vbGreen End if End Function |
---|---|
|