主题：统计表与引用

楼主这样做不是太累了吗？

简化一下：

dim Tbl as table = tables("统计表_Table1")

1.直接用sql语句：

dim Sqlstring as string = "select a.订单号,a.编号,b.单价,a.数量 from (select 订单号,编号,sum(数量) as 数量 from 订单表 group by 订单号,编号) a,产品表 b where a.订单号 = b.订单号 and a.遍号 = b.编号"

Tbl.fill(Sqlstring,"数据源",true)

2.代码实现：

Dim gb As New SqlGroupTableBuilder("统计表","订单表")
gb.Connection Name = "数据源"
Dim Cols1() As String = {"订单号","编号"}
Dim Cols2() As String = {"订单号","编号"}
gb.AddTable("订单表",Cols1,"产品表",Cols2)
gb.Groups.AddDef("{订单表}.订单号")
gb.Groups.AddDef("{订单表}.编号")
gb.Groups.AddDef("单价")
gb.Totals.AddDef("数量","数量") '对数量进行统计
Tbl = gb.BuildDataSource()