现场有三台泵，A，B ,C ,想做一个现场水泵出口压力低时在电脑上声音报警，因程序有密码无法更改程序。 脚本如下 Option Explicit Function action Dim Tag Dim tag1 Dim B Dim C Dim D Set Tag = HMIRuntime.Tags("MD0") Set tag1 = HMIRuntime.Tags("报警") Set B = HMIRuntime.Tags("B") Set C = HMIRuntime.Tags("C") Set D = HMIRuntime.Tags("A") D.Read B.Read C.Read Tag.Read If D = 1 Or B = 1 Or C = 1 And Tag.Read <5 Then tag1.Write 1'statements Else tag1.Write 0'statements End If End Functi 注释：A，B，C，为三台泵的运行信号，MD0为出口压力，数据类型为32位无符号，报警为内部变量 写好后wincc运行报错如下 ============Microsoft VBs cript 运行时错误============ Application : Globals cript Runtime Action : s criptact\动作1.bac Error : 对象不支持此属性或方法 ============Microsoft VBs cript 运行时错误=========== 请问这问题出在哪里，能具体说一下怎么改吗，谢谢