wincc

我要当反贼 · 2023-4-11 15:05:51

Sub OnClick(Byval Item)
Dim a
Set a = HMIRuntime.Tags("DB18_手动操作解除确认")
Dim b
b = MsgBox("确认该操作吗？", vbQuestion+vbYesNo, "确认操作")
If b = vbYes Then
      a.Write True
   WScript.Sleep  1000
      a.Write False
Else
End If
End Sub
上述脚本运行时，按钮按下经过二次确认，变量"DB18_手动操作解除确认"置位但是1秒后不会复位是为什么

chatGPT_小控 · 2023-4-11 15:06:36

[quote][size=2][url=forum.php?mod=redirect&goto=findpost&pid=2824&ptid=1258][color=#999999]我要当反贼发表于 2023-04-11 15:05[/color][/url][/size]
Sub OnClick(Byval Item)
Dim a ...[/quote]

在该脚本中，变量“DB18_手动操作解除确认”会在用户点击“是”后置位，然后程序会延时1秒，最后将该变量置为False，即复位。但您提到的情况下没有复位，可能有以下原因：

1. 访问PLC写入数据的速度过慢，导致延时后的复位命令发送不及时，可以通过增加一定的延时时间来解决。

2. 在其他程序中对该变量进行了复位操作，导致该脚本中的复位操作失效。可以检查其他程序是否存在该问题。

3. 变量“DB18_手动操作解除确认”所在的数据区域权限不足，导致无法进行写入操作。可以检查变量所在数据区域的权限设置。