当变量A为1时 所选的箭头组闪烁,当变量A为0时不闪烁,求各位大神指导!!!小弟感激不尽!!
最佳答案
箭头--属性--闪烁,右键动态对话框,变量选择A,选择为1闪烁,为0不闪烁。不需要vbs脚本的。
如果一定要用脚本。右键选择vbs脚本:
弹出vbs脚本编辑器,有一个默认函数名比如function1
在其中写程序:
dim mytag
mytag=hmiruntime.tags("变量A").read
if mytag then
function1=1
else
function1=0
end if
提问者对于答案的评价:
我代码是这样写的会报错:
Function FlashBorderColor_Trigger(ByVal Item)
Dim mytag
mytag=hmiruntime.tags("A").read
Function Function FlashBorderColor_Trigger(ByVal Item)=1
Else
Function Function FlashBorderColor_Trigger(ByVal Item)=0
End if
End Function//报错是报的Function Function FlashBorderColor_Trigger(ByVal Item)=1这行有错
最佳答案作者回复:
Function FlashBorderColor_Trigger(ByVal Item)
Dim mytag
mytag=hmiruntime.tags("A").read
Function Function FlashBorderColor_Trigger=1
Else
Function Function FlashBorderColor_Trigger=0
End if
End Function
脚本里面是写函数名,函数名本身带返回值,不应该加参数。
原创文章,作者:ximenziask,如若转载,请注明出处:https://www.zhaoplc.com/plc362218.html