wincc7.3 MSHFlexGrid 控件怎么实现手动录入功能啊？（或者有什么支持手动输入的表格控件？）我查了有用TEXT控件作为录入窗口的。但是案列是VB里面的，不是VBS里面的，没办法用。另外我参考了此论坛里提供的部分VBS代码批量录入数据，也报错说不支持此方法。（也能显示，但是就是总报错要调试），另外用什么属性可以调整生成的网络格里文字的对齐方式？？
Dim a,b
Set a = ScreenItems.Item ("MSHFlexGrid")
Set b = ScreenItems.Item ("text")
a.Rows = 255 '设置总行数
a.Cols = 7 '设置总列数
a.TextMatrix(0,0)="序号" '#设置标题
a.TextMatrix(0,1)="1"
a.TextMatrix(0,2)="2"
a.TextMatrix(0,3)="2"
a.TextMatrix(0,4)="4"
a.TextMatrix(0,5)="5"
Dim i
For i = 1 To 255 Step 1
a.TextMatrix(i,0)= CStr(i) -----------------------此处为报错位置
Next
最佳答案
这个VBS的属性和VB是有区别的。我这里有一些设置的方法，是经过测试的。想要的话加我吧2606352062。
外观属性设置
?设置列宽，假设为第n列
oList.ColWidth(n) = 800
?设置行高，假设为第n行
olist.rowheight(n)=500
?设置某一列的对齐方式，假设为第n列
olist.ColAlignment(n)=x
x的值对应的相关描述如下
flexAlignLeftTop 0 单元格的内容左、顶部对齐。
flexAlignLeftCenter 1 字符串的缺省对齐方式。单元格的内容左、居中对齐。
flexAlignLeftBottom 2 单元格的内容左、底部对齐。
flexAlignCenterTop 3 单元格的内容居中、顶部对齐。
flexAlignCenterCenter 4 单元格的内容居中、居中对齐。
flexAlignCenterBottom 5 单元格的内容居中、底部对齐。
flexAlignRightTop 6 单元格的内容右、顶部对齐。
flexAlignRightCenter 7 数值的缺省对齐方式。单元格的内容右、居中对齐。
flexAlignRightBottom 8 单元格的内容右、底部对齐。
flexAlignGeneral 9 字符串按“左、居中”显示，数字按 “右，居中”显示。
?设置控件的行数列数（n行，x列）
oList.Rows=n
olist.Cols=x
?选中某一个单元格（n行，x列）
oList.Row=n
olist.Col=x
?设置某一单元格背景颜色
olist.CellBackColor = RGB(220, 220, 220)
?设置网格线的颜色
olist.GridColor=RGB(100, 220, 220)
?设置网格线的宽度
olist.GridLineWidth=5
?设置各单元之间的线的类型
GridLines = x
X对应的相关描述如下：
flexGridNone 0 没有线。
flexGridFlat 1 普通线（默认）
flexGridInset 2 下陷线
flexGridRaised 3 凸起线。
?设置表格中空白部分的颜色
olist.BackColorBkg=RGB(100, 100, 220)
?设置表格中表头部分的颜色
olist.BackColorFixed=RGB(100, 100, 100)
单元格字体设置
?设置某单元格字体为粗体
提问者对于答案的评价：
非常感谢
原创文章，作者：more0621，如若转载，请注明出处：https://www.zhaoplc.com/plc145116.html
微信扫一扫 
支付宝扫一扫 