Dim t As Table = CurrentTable
Dim ns As C1.Win.C1FlexGrid.CellStyle = t.Grid.Styles.Add("自定义样式")
ns.BackColor = Color.White
ns.ForeColor = Color.Red
ns.Font = New Font("宋体", 10, FontStyle.Bold)
For i As Integer = t.TopPosition To t.BottomPosition
For j As Integer = t.LeftCol To t.RightCol
t.Grid.SetCellStyle(i + 1,j + 1,ns)
Next
Next