主题：合计行颜色

Dim g As New CrossTableBuilder("统计表1", DataTables("订单"))
g.HGroups.AddDef("产品")
g.VGroups.AddDef("客户")
g.Totals.AddDef("数量", "数量")
g.HorizontalTotal = True
g.VerticalTotal = True
g.VerticalProportion = True
g.Build()

Dim t As Table = Tables("统计表1")
Dim cs1 As C1.Win.C1FlexGrid.CellStyle = t.grid.Styles.Add("cs1")
cs1.BackColor = Color.Red
For j As Integer = 1 To t.Cols.Count
    t.Grid.SetCellStyle(t.Rows.Count, j, cs1)
Next

MainTable = t