超碰成人av-青青草97-天天做天天躁天天躁-久久精品国产亚洲一区二区-亚洲天堂狠狠干-在线观看欧美精品-国产精品美女一区二区视频-国产成人欧美日韩在线电影-一级片免费看视频-免费国产视频在线观看-伊人网久久久-无码人妻丰满熟妇啪啪网不卡-精品欧美乱码久久久久久-国产真实夫妇视频-中文久草

younthue
級別: 探索解密
精華主題: 0
發(fā)帖數量: 18 個
工控威望: 141 點
下載積分: 558 分
在線時間: 11(小時)
注冊時間: 2014-05-14
最后登錄: 2022-04-21
查看younthue的 主題 / 回貼
樓主  發(fā)表于: 2016-09-06 11:07
我創(chuàng)建了一個畫面窗口,在畫面窗口內做了一個小圓形指示燈,想用這個小圓形根據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