转换按钮功能不好使

我用VB编一个带有手自动转换的功能按钮,按左键即按一下自动,再按一下手动,再按一下自动,以此类推,用一个变量,自动时为1,手动时为0,正常时好用,但有时突然间自动变手动程序如下Sub OnLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y)   
Dim Tag
Set Tag = HMIRuntime.Tags("变量名")

Tag.Read 
If Tag.Value =1 Then
   Tag.Value=0
   Else
   Tag.Value =1
   End If
   Tag.Write 
   
End Sub

最佳答案

请 参 照 以 下 三 个 方 法 : 
如何在WINCC中制作一个保持型按钮
方法1:
if( GetTagBit("变量名") )
   SetTagBit("变量名",0);
else
   SetTagBit("变量名",1);
方法2:
SetTagBit("变量名",(SHORT)!GetTagBit("变量名"));
求反指令,如果为1点击变为0,
如果为0点击变为1
方法3:
或者做两个按钮,
按钮一:显示,直接连接"变量名",是--不显示,否--显示 。事件,直接连接,源,常数1,"变量名",
按钮二:事件,直接连接,源,常数0,变量"变量名";
用按钮一覆盖按钮二

提问者对于答案的评价:
试了一下,等几天看效果

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

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2017年11月1日 上午12:49
下一篇 2017年11月1日 上午12:49

相关推荐