专家坐堂-[求助]帮忙看一段代码Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim dt1 As fxDataSource

Dim g As New GroupTableBuilder("统计表2", DataTables("订单主表"))

g.Groups.AddDef("客户全称")

g.Totals.AddDef("总金额")

g.FromServer = True

g.Build()

dt1 = g.BuildDataSource()

Dim dt2 As fxDataSource

Dim b As New SQLGroupTableBuilder("统计表1","退货主表")

b.C

b.Groups.AddDef("客户全称")

b.Totals.AddExp("总已付","总金额-少退金额-实退金额")

b.Build

dt2 = b.BuildDataSource()

dt1.Combine("客户全称",dt2,"客户全称")

Tables("统计_Table1").DataSource = dt1