主题：网格线求教

比如

Dim tb As Table = Tables("表A")
Dim cs1 As C1.Win.C1FlexGrid.CellStyle = tb.Grid.Styles.Add("样式1")
Dim rng As C1.Win.C1FlexGrid.CellRange = tb.Grid.GetCellRange(1,2, 3,3)
cs1.backcolor = color.yellow
cs1.forecolor = color.red
cs1.Border.Direction = 1
rng.style = cs1