wincc循环灯c语言,WINCC VBS求教，for循环的都不等于咋做。。-工业支持中心-西门子中国...

现在的for循环语句如下，不是太会怎么加入一个都不等于的条件。

是不是单独再写个for循环比较都不等于？怎么写都不等于的条件啊。

For i=1 To 100

If  Array(i).value<>"" Then

If Array(i).value=name.value Then

nameP.Read

nameP.Write Mid(TM.Value,3,4)

MsgBox nameP.Value

timeP.Read

timeP.Write Mid(TM.Value,7,8)

MsgBox timeP.Value

weight.Read

weight.Write Mid(TM.Value,15,2)

Dim weights

Set weights = HMIRuntime.Tags("库重"&i)

weights.Read

weights.Write CInt(weight.Value)*DX.Value+weights.Value

MsgBox CInt(weight.Value)*DX.Value

Dim UA_TMRK_ID

Set UA_TMRK_ID = HMIRuntime.Tags("@UA_TMRK_ID")

Dim UA_TMRK_Job

Set UA_TMRK_Job = HMIRuntime.Tags("@UA_TMRK_Job")

UA_TMRK_ID.Read

UA_TMRK_ID.Write -1

UA_TMRK_Job.Read

UA_TMRK_Job.Write 6

Exit For

End If

End If

Next

问题补充：在等于的if end后加的这句，现在好像没问题，是不是不等于的条件都这么写

If Array(i).value<>name.value Then

a=a+1

If a=100 then

MsgBox "该条码不在库名单"

End If

End If

提问时间：2017-09-23 11:42:00   提问者： godlike0091 - 学长&nbsp&nbsp第2级

问题ID: 173883