VBS 实现单按钮控制

VBS 实现单按钮控制,控制变量M1 如
按下,置位;再按下复位;
如何编写程序?

问题补充:
Dim a
Dim b
Dim c

c=MsgBox("确定要超差确认吗",vbYesNo +vbExclamation + vbDefaultButton2,"提示信息")
If c=vbYes Then
 Set a=HMIRuntime.Tags("A_TouYT_shoudong_B")
    a.Read
     MsgBox("1")
   If a=0 Then
      a.Write 1
      a.Read
       MsgBox("2")
     Else   
     a.Write 0
     a.Read
      MsgBox("3")
     End If
      MsgBox("4")
End If
MsgBox("5")
End Sub
///现在情况 只执行到MsgBox("1")

最佳答案

楼上的都没有看就来了!vbs是上位机做的。wincc的按钮的vbs中:
dim mytag
mytag=hmiruntime.tags("tag").read
if mytag=1 then
hmiruntime.tags("tag").write 0
else hmiruntime.tags("tag").write 0
end if

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

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

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2018年12月1日 下午10:39
下一篇 2018年12月1日 下午10:40

相关推荐