Sub OnLButtonDown(Byval Item, Byval Flags, Byval x, Byval y)
'***********************提取Data.txt内容***********************
Const ForReading = 1
Dim fso
Set fso = CreateObject("s cripting.FileSystemObject")
Dim txtFile,szContent
Set txtFile = fso.OpenTextFile("E:\DATA.TXT",ForReading)
szContent =txtFile.ReadAll
txtFile.close
'***********************读取指定行和列的数据***********************
Dim iReadRow,iReadCol
iReadRow = 3
iReadCol = 2
Dim RowsContent
RowsContent = Split(szContent,vbCrLf) '#按回车符分割数组
Dim ColsContent
ColsContent = Split(RowsContent(iReadRow-1)," ") '#RowsContent(iReadRow-1)即为第n行的数据
HMIRuntime.Trace "The Data is :" & ColsContent(iReadCol-1) & vbCrLf
End Sub
The Data is 我把这个地方写位内部变量地址，我在画面上连接IO域后没有查询到的数值显示，VBS脚本调试器上面是显示我的那个地址的地方是有数值的，就是不会显示数据类型选择的是文本变量
问题补充：
具体的是用哪个vbs写指令脚本呢！该怎样用
HMIRuntime.valueColsContent(iReadCol-1)=（“A22”）.Write
这样写对吗？
图片说明：
最佳答案
需要使用变量写指令把数值写到Wincc变量中HMIRuntime.Tags("Tag1").Write Value1
Tag1为I/O域连接的Wincc变量，Value1为要写入的值
提问者对于答案的评价：
谢谢了
原创文章，作者：ximenziask，如若转载，请注明出处：https://www.zhaoplc.com/plc358959.html
微信扫一扫 
支付宝扫一扫