签到有奖
消息提醒
运维工程师专区
官方商城
扫码分享好友 任选多种周边
使用VB脚本对onlinetablecontrol的属性进行更改,其中这项ColumnAutoPrecisions 属性在WinCC V7.5 WinCC: Scripting (VBS, ANSI-C, VBA) 里说明是数值列的小数精度,当为FALSE时,可以通过名称ColumnPrecisions 输入小数点后的位数,来回检查好多遍了,实际运行后就是改不过来,还是自动小数精度,请大佬帮忙看看怎么才能修改过来?
著作权归作者所有。商业转载请联系作者获得授权,非商业转载请注明出处。
帖子链接:https://www.ad.siemens.com.cn/club/bbs/post.aspx?a_id=1796832&b_id=5&s_id=0&num=3
先删除表格再添加试试,
'//********************************删除所有数据列********************************//
While Table1.ValueColumnCount > 0
Table1.ValueColumnIndex = 1
Table1.ValueColumnRemove = Table1.ValueColumnName
Wend
'//********************************创建数据表********************************//
If (Table_Sel1.Value <> 0) Then
If (Table_Sel1.Value And 2^0) Then
Table1.ValueColumnAdd = "黄家坝水库流量"
Table1.ValueColumnVisible = 0
Table1.ValueColumnTagName = "CS\T1" '分配归档变量
Table1.ValueColumnAutoPrecisions = 0
Table1.ValueColumnPrecisions = 1
End If
表格宽度可以到最后统一给定,通过判断标题的宽度来设定宽度
For Column_Count = Table1.ValueColumnCount To 0 Step -1
Table1.ValueColumnIndex= ColumnIndex
Table1.valueColumntimecolumn = "时间列 1"
Table1.ValueColumnAlign=1
Table1.ValueColumnForeColor = vbBlack
Table1.ValueColumnLength = Len(Table1.ValueColumnName)*2-1
Table1.ValueColumnVisible = 1
ColumnIndex = ColumnIndex +1
Next
没有设置属性的索引吧
分享
扫码分享好友 任选多种好礼
收藏
有帮助
欢迎您访问支持中心!
丰富的视频,全方位的文档,大量的网友交流精华……
为了更好的完善这些内容,我们诚邀您在浏览结束后,花20秒左右的时间,完成一个用户在线调查!
感谢您的支持!
密码至少8位,包含大、小写字母,数字和符号至少三种。
允许邮箱和手机接收来自支持中心网站的信息
我已同意《支持中心网站注册协议和隐私政策》
微信登录扫码一键登录
验证码登录
密码登录
二维码失效点击重试
打开微信扫一扫,快速登录/注册
未注册手机验证后自动登录,注册即代表同意《支持中心网站注册协议和隐私政策》
三日内免验证登录
短信登录
登录