设置Table控件取得列的列宽:
1、Tables("数据查询窗口_Table1").SetColVisibleWidth("单位名称|80|姓名|100|身份证号|180")
2、Tables("数据查询窗口_Table1").Cols("身份证号").Width = 350 单位:象素
3、currenttable.Cols("第一列").Printwidth 单位:毫米