主题：[求助]临时表交替行颜色与字体大小(解决)

Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("产品", Gettype(String), 32)
dtb.AddDef("客户", Gettype(String), 32)
dtb.AddDef("数量", Gettype(Integer))
dtb.AddDef("金额", Gettype(Double))
dtb.Build()

Dim f As New Filler
f.SourceTable = DataTables("表A") '指定数据来源
f.SourceCols = "产品,客户" '指定数据来源列
f.DataTable = DataTables("统计") '指定数据接收表
f.DataCols = "产品,客户" '指定数据接收列
f.Fill() '填充数据

DataTables("统计").SysStyles("Alternate").BackColor = Color.Red

Forms("窗口2").open