…… grid.Styles.EmptyArea.Border.Style = C1.Win.C1FlexGrid.BorderStyleEnum.None
Table1.SetColVisibleWidth(ColVisible(i))
Table1.ExtendLastCol = True
dim cols1() as string = dict(tableName(i) & "_名称")
dim cols2() as string = dict(tableName(i) & "_标题")
for k as integer = 0 to cols1.length - 1
Table1.DataTable.DataCols(cols1(k)).Caption = cols2(k)
Table1.DataTable..BuildHeader
next
End If
Next