Dim g As New SQLGroupTableBuilder("统计表1", "明细表") '这里使用后台统计,如果数据已经全部加载可以直接用GroupTableBuilder
g.C '外部数据表的话要指定数据源名称
g.Groups.AddDef("门店名称")
g.Groups.AddDef("姓名")
g.Totals.AddDef("数量")
g.VerticalTotal = True
'g.Subtotal = True '生成汇总模式 老师，移动版没有这个功能是吗，没有反应。。。
g.Filter = filter
Dim dt As DataTable = g.Build(False)
With wb.AddTable("","Table1")
.Alternate = 3
Dim nms() As String = {"门店名称","姓名","数量"}
.Head.AddRow(nms)
For Each r As DataRow In dt.DataRows
With .Body.AddRow(r("门店名称") ,r("姓名"),r("数量"))
End With
Next
End With
e.WriteString(wb.Build)
[此贴子已经被作者于2017/9/17 7:54:35编辑过]
加好友 
发短信
Post By：2017/9/17 7:53:00 [显示全部帖子]
