问：我用VBS 实现按钮置反功能，好像不行。
我的程序是
Sub OnClick(Byval Item)           
Dim  tag1
Set tag1=HMIRuntime.Tags("Q02")
If  tag1=1 Then
tag1.write 0
Else
tag1.Write 1
End If
End Sub

请问问题出在哪儿？

答：修改后的脚本应该是：

Sub OnClick(Byval Item)           
Dim  tag1
Set tag1=HMIRuntime.Tags("Q02")
tag1.read
If  tag1.Value=1 Then
tag1.write 0
Else
tag1.Write 1
End If
End Sub