Option Explicit
Function action
Dim objOnlineTable
Set objOnlineTable =ScreenItems("table") ''设置成表格控件
objOnlineTable.ExportFilename = "aaa" ''设置文件名
objOnlineTable.ExportDirectoryname = "d:\" ''设置路径
objOnlineTable.Export() ''导出
End Function
上面代码是在线数据表导出用的,如果换成在线趋势图则为
Option Explicit
Function action
Dim objOnlineTrend
Set objOnlineTrend =ScreenItems("Trend") ''设置成趋势控件
objOnlineTrend.ExportFilename = "aaa" ''设置文件名
objOnlineTrend.ExportDirectoryname = "d:\" ''设置路径
objOnlineTrend.Export() ''导出
End Function
我不清楚的是如果很多画面中应该怎么用,如何锁定不同画面中的同名控件?