Question

wincc 临时变量写入内部变量

在按钮的鼠标左键按下时间中用VBS脚本实现读取excel中的值，并把该值写入内部变量ad
代码如下：
Dim fso,myfile
Set fso = CreateObject("scripting.FileSystemObject")
Set MyFile = fso.GetFile("d:\test\menu.xlsx")
Dim A
Set A = CreateObject("Excel.Application")
A.Visible = True
A.Workbooks.Open MyFile
Dim ad0
Set ad0 = HMIRuntime.Tags("ad")
ad0 = A.worksheets ("sheet1").Cells(1, 1).value
MsgBox ad0
ad0.Write
这是从网上找的一段程序修改的，目前程序到MsgBox ad0都是前都是没问题的，关键在于临时变量ad0的值如何写入内部变量ad？忘高手指点

Answer 1

HMIRuntime.Tags("ad").Write ad0