Tables("表A").grid.cols("第一列").style.font = new font("宋体", 13)
--------------
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.font = new font("宋体", 15) rng.style = cs1