按钮的鼠标动作触发如下vb脚本

Dim Tag

Set Tag=HMIRuntime.Tags("Tag")

Tag.Read

If &H80<>Tag.QualityCode Then

HMIRuntime.Trace"Error:"&Tag.LastError &vbCrLf & "ErrorDes cription:" & Tag.ErrorDes cription &vbCrLf & "QualityCode: 0x" & Hex (Tag.QualityCode)&vbCrLf

Else

HMIRuntime.Trace "Value:" & Tag.Value & vbCrLf

End If

这段程序是什么意思？为什么诊断窗口没有显示任何信息？还用对窗口进行组态吗？