恭喜,你发布的帖子
发布于 2018-11-30 14:09:04
3楼
在发布的时候,系统会检测啊。要勾选VBS脚本。
我的脚本是写在按钮里的,发布的时候没有任何报错,但是有些语句没哟生效。
我把代码发出来帮我看下吧。
在本地执行都是正常的,客户端执行有问题, 在线表格控件没有创建“A相电流”这一列
Dim pic,pic1
Set pic=HMIRuntime.screens("main").ScreenItems("画面窗口6") '获取pf-zhengwen画面里的子画面"画面窗口1"
Dim Prefix
Dim guidang
Set pic1=HMIRuntime.screens("main").ScreenItems("画面窗口4") '获取pf-zhengwen画面里的子画面"画面窗口1"
Prefix=pic1.TagPrefix ‘变量前缀字符串
guidang="power" ‘归档名字符串
pic.Visible=True '设置可见
Dim objControl
Dim objTimeColumn
Dim objValueColumn
Set objControl =HMIRuntime.Screens("main.画面窗口6:Power_Report").ScreenItems("控件2")
' Control wide specification
objControl.ColumnResize = False
objControl.TimeBase = 1
objControl.TimeColumnTimeFormat = "HH:mm:ss tt"
objControl.TimeColumnLength = 20
Set objTimeColumn = objControl.GetTimeColumn("时间")
objTimeColumn.DateFormat = "dd/MM/yy"
Set objValueColumn = objControl.GetValueColumnCollection.AddItem("A相电流")
objValueColumn.Caption = "A相电流"
objValueColumn.Length = 10
objValueColumn.Align = 0
objValueColumn.Provider = 1
objValueColumn.AutoPrecisions=0
objValueColumn.Precisions=1
objValueColumn.TagName = guidang&"\"&Prefix&".Ia"
objValueColumn.TimeColumn = "时间"
请填写推广理由:
分享
只看
楼主