生成交叉表以后,再设置,如
Dim g As New CrossTableBuilder("统计表1", DataTables("收益"))
g.HGroups.AddDef("项目编号")
g.VGroups.AddDef("确认时间")
g.Totals.AddDef("分期金额", "分期金额")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Decimals = 2
g.Build()
Dim t As Table = Tables("统计表1")
For Each c As Col In t.Cols
If c.IsNumeric Then
c.Width = 50
c.DataCol.SetFormat("#,###.00")
End If
Next
MainTable = t