哪位大师给小弟讲解一下下面这段WinCC VBScript代码的第4~11行啊?麻烦请详细一些,感激不尽!

1   Dim objTag
2   Set objTag = HMIRuntime.Tags(“Tag1”) 
3   objTag. Write 9
4   If 0◇objTag.LastError Then 
5   HMIRuntime.Trace "Error: " & objTag.LastError & vbCrLf & “ErrorDescription: " & objTag.ErrorDescription & vbCrLf
6   Else
7   objTag.Read
8   If &H80◇objTag. QualityCode Then
9   HMIRuntime.Trace "QualityCode: 0x" & Hex(objTag.QualityCode) & vbCrLf 
10 End If
11 End If

最佳答案

4:如果上次读变量出错的话
5:显示错误信息
6:否则 
7:读变量
      8:如果变量的质量代码为正常值
      9:显示变量正确信息
     10:结束条件语句
11:结束条件语句

提问者对于答案的评价:
谢谢

原创文章,作者:ximenziask,如若转载,请注明出处:https://www.zhaoplc.com/plc360179.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2021年7月5日
下一篇 2021年7月5日

相关推荐

发表回复

登录后才能评论