我用VB脚本写下面函数,好像并没有把值写进去,是哪里写错了吗,该怎么实现(a0,a1,a2...a10以及在wincc内部变量定义过了)
Dim shuzu(10)
Dim i
For i=0 To 10
shuzu(i)=i*1.2
HMIRuntime.Tags("a"&i).Write shuzu(i)
Next
最佳答案
你试试下面代码:
Dim shuzu(10)
Dim i
Dim TagStr
Dim Tag
For i=0 To 10
TagStr = "a" & i
shuzu(i)=i*1.2
set Tag = HMIRuntime.Tags(TagStr)
Tag.Write shuzu(i)
Next
提问者对于答案的评价:
可以了,谢谢
原创文章,作者:ximenziask,如若转载,请注明出处:https://www.zhaoplc.com/plc355347.html