恭喜,你发布的帖子
发布于 2018-09-27 15:43:38
1楼
用两个IO域实现。
IO1,输入输出域,Output Value属性绑定内部变量Tag1;
IO2,输出域,Output Value属性组态VBS动作:
Function OutputValue_Trigger(ByVal Item)
Dim Tag1,PlcTag
Dim Result
Set Tag1 = HMIRuntime.Tags("Tag1")
Set PlcTag = HMIRuntime.Tags("PlcTag")
Result = Tag1.Read + 20 '计算部分
PlcTag.Write Result, 1
OutputValue_Trigger = Result '将计算结果返回到Output Value属性中
End Function
请填写推广理由:
分享
只看
楼主