91美女视频-亚洲免费观看视频-欧美a∨-久热在线视频-日韩黄网站-成av人片在线观看www-久操综合-超碰av在线播放-性欧美欧美巨大69-婷婷二区-av男人的天堂网-中文字幕一区在线播放-玖草在线观看-国产网址在线观看-免费在线不卡av

我創(chuàng)建了一個(gè)畫面窗口，在畫面窗口內(nèi)做了一個(gè)小圓形指示燈，想用這個(gè)小圓形根據(jù)PLC變量的值變換顏色，VBS代碼如下，運(yùn)行結(jié)果顏色不變，全局顏色方案已設(shè)置為否。請(qǐng)幫忙看看是哪里有問題？謝謝！

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