Dim t As Table = Tables("表A")
Dim cs1 As C1.Win.C1FlexGrid.CellStyle = t.Grid.Styles.Add("样式1")
cs1.forecolor = Color.red
cs1.backcolor = Color.yellow
cs1.Border.Width = 3
cs1.Border.Color = Color.Red
cs1.Border.Direction = 0
Dim range = t.Grid.GetCellRange(0, 2,t.Grid.rows.count - 1,2) ‘第二列
range.Style = cs1