在脚本的前面加：Dim aa Set aa=HMIRuntime.Tags("内部二进制变量")aa.ReadIf aa.Value=1 Then ..........你自己的脚本...........End if
Dim AAA AAA=HMIRuntime.Tags("内部二进制变量").read If aa =1 Then (脚本执行) End if
