写程序
写一个西门子winCC 7.4 VBS脚本，要求如下：1、在按钮事件中，鼠标动作触发。
2、取二进制内部变量“RUN”
3、当按钮动作时，变量“RUN”为1
4、当按钮再次动作时，变量“RUN”为0
下面是符合您要求的西门子winCC 7.4 VBS脚本程序：
Sub Button_OnClick()
Dim RUN
RUN = GetTagValue("Binary_TAG") '获取二进制内部变量“RUN”的值
If RUN = 0 Then '当变量为0时，将其改为1
SetTagValue "Binary_TAG", 1
Else '当变量为1时，将其改为0
SetTagValue "Binary_TAG", 0
End If
End Sub
这个程序会在按钮事件中监听鼠标动作，即当用户点击按钮时触发。程序首先通过GetTagValue函数获取内部二进制变量“RUN”的值，然后根据其值来决定变量的设置。当变量为0时（即未运行状态），点击按钮后将其改为1（即开始运行状态）；当变量为1时（即已运行状态），再次点击按钮则将其改为0（即结束运行状态）。
同时，假设您已经在winCC 7.4中创建了一个名为“Binary_TAG”的二进制内部变量来存储运行状态，程序中使用了SetTagValue函数来修改该变量的值。需要注意的是，这个程序仅能作为参考，具体的实现还需结合您的特定场景进行调整。
页:
[1]