按钮使用VB脚本置位两给位中的一个

有三个变量,分别是“十二点一”,“十二点令”,“八点零”;然后在画面中做一个按钮,当鼠标按下该按钮时,用VB脚本根据变量“八点零”的状态来决定是置位哪一个变量,八点零为0时置位变量“十二点零”为1时置位“十二点一”,代码如下
Sub OnLButtonDown(ByVal Item, ByVal Flags, ByVal x, ByVal y) 
Dim tag
Dim tag0
Dim tag1
Set tag1 = HMIRuntime.Tags("十二点一")
Set tag0 = HMIRuntime.Tags("十二点令")
Set tag = HMIRuntime.Tags("八点零")
If Tag.Value = 0  Then
tag0.Write 1
Else
tag1.Write 1

End if

End Sub
代码是这样吗?如果是的话为什么不管变量八点零状态是什么状态,置位的都是十二点零呢?

最佳答案

需要加一个read。
Dim tag
Dim tag0
Dim tag1
Set tag1 = HMIRuntime.Tags("十二点一")
Set tag0 = HMIRuntime.Tags("十二点令")
Set tag = HMIRuntime.Tags("八点零")
tag.Read
If Tag.Value = 0  Then
tag0.Write 1
Else
tag1.Write 1

提问者对于答案的评价:
谢谢!虽然touch++的也对,但感觉没你的简洁,还是给你吧,同时也感谢touch++提供的支持,谢谢!

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

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2019年6月11日 上午6:40
下一篇 2019年6月11日 上午6:40

相关推荐

  • 配置sm@stserver与sm@stclient远程访问

    远程监控中,如何配置手机sm@stclient客户端显示的内容?sm@stserver的HMI是在ERTHERNET局域网内通过网关上Internet公网的,如何设置访问的IP地址…

    SIMATIC WinCC 2020年11月1日
  • 如何将WCC变量快速由DP通道全部转为以太网通道

    原来WCC与PLC是通过DP联网的,现在就是想将DP联网更改为以太网,但是WCC上原来的变量都是DP通道的.如何能把这些变量链接全部快速转为以太网通道.请赐教,本人是小虾,刚学,谢…

    SIMATIC WinCC 2020年11月1日
  • wincc画面切换错误

    wincc在切换画面时为何会自动启动系统,(jk1画面切换到jk2画面时,jk2系统会自动启动,不知为何,每次都要点击停止,高手指点下有可能的错误在哪。)谢谢。 最佳答案 如果你确…

    SIMATIC WinCC 2021年7月5日
  • 智能化工厂数据归档转存

    请教各位,一般用通过什么方式把WINCC自带数据库(SQL2008)的归档数据转存到其他实时数据库里阿?在做工业大数据 最佳答案 1、你可以用脚本比如VBSWinCC/连通性软件包…

    SIMATIC WinCC 2020年11月1日
  • DataGrid单元格编辑

    想试着做下用DataGrid显示sql数据库表格内容和编辑数据库表格值的程序Sub OnClick(ByVal Item)   &…

    SIMATIC WinCC 2017年8月3日
  • wincc flexible监控界面

    用wincc flexible做毕设,题目单容水箱液位控制系统,遇到了问题,请大佬指点迷津。问题一,变量表中已经定义地址M0.0为PID控制方式,当为1时,手动控制;为0…

    SIMATIC WinCC 2021年7月5日
  • WINCC画面窗口VBS

    现在有A,B,C,三个画面,A是主画面里面有一个画面窗口,和一个按钮,按下按钮主画面A里面的画面窗口显示B画面,B画面里面又有一个C画面窗口和一个按钮,按下按钮弹出C画面窗口,用全…

    SIMATIC WinCC 2021年7月5日
  • 笔记本与smart触摸屏的以太网通讯

    连接不上,IP屏192.168.2.5,电脑192.168.2.100.编译通过了,PING也通过了,就是传输的时候到正在准备与设备建立连接。。。  设备无法连…

    2021年7月5日
  • wincc7.0的系统问题

    WINCC7.0在英文版的XP系统开发出的项目,放在中文版的XP系统(现场的工控机)中运行有没有问题,会不会出现字体乱码等问题,希望有类似经历的大侠们指点下 最佳答案 首先看看你的…

    SIMATIC WinCC 2019年6月11日
  • wincc对下位机写值的问题,请教下诸位朋友。

    请教下诸位朋友,我现在PLC-s7-300有一个DB位被s(set)为1,我在上位机WINCC6.0sp3画面中新建一个输入输出框,引入该DB位,输入为0(false),确定后,下…

    SIMATIC WinCC 2019年6月11日