以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  组合多个统计结果后,如果想放在内存里,不展示也不绑定table,怎么写?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=140968)

--  作者:chen37280600
--  发布时间:2019/9/18 12:52:00
--  组合多个统计结果后,如果想放在内存里,不展示也不绑定table,怎么写?
我记得曾经问过这个问题,又忘了

Dim bd1 As New GroupTableBuilder("统计表1",DataTables("进货单"))
Dim
dt1 As fxDataSource
bd1
.Groups.AddDef("型号") \'根据型号分组
bd1
.Totals.AddDef("数量","进货_数量") \'对数量进行统计
bd1
.Totals.AddDef("金额","进货_金额") \'对金额进行统计
dt1
= bd1.BuildDataSource() 

Dim bd2 As New GroupTableBuilder("统计表2",DataTables("销售单"))
Dim
dt2  As fxDataSource
bd2
.Groups.AddDef("型号") \'根据型号分组
bd2
.Totals.AddDef("数量","销售_数量") \'对数量进行统计
bd2
.Totals.AddDef("金额","销售_金额") \'对金额进行统计
dt2
= bd2.BuildDataSource()

Dim bd3 As New GroupTableBuilder("统计表3",DataTables("退货单"))
Dim
dt3 As fxDataSource
bd3
.Groups.AddDef("型号") \'根据型号分组
bd3
.Totals.AddDef("数量","退货_数量") \'对数量进行统计
bd3
.Totals.AddDef("金额","退货_金额") \'对金额进行统计
dt3
= bd3.BuildDataSource()

dt1.Combine("型号",dt2,"型号") \'将销售统计数据组合到进货统计数据
dt1
.Combine("型号",dt3,"型号") \'将退货统计数据组合到进货统计数据
dt1.Show(
"统计表1") \'显示统计结果


假如我现在不想生成表,只想在datatable内存里使用,类似 jb.build(True)的效果,请问方法是什么?


--  作者:有点蓝
--  发布时间:2019/9/18 13:54:00
--  
dt1.Combine("型号",dt2,"型号") \'将销售统计数据组合到进货统计数据
dt1.Combine("型号",dt3,"型号") \'将退货统计数据组合到进货统计数据
vars("dt") = dt1

----------
把dt1当做system.data.datatable一样使用即可
Output.Show(vars("dt").Rows.count)
Output.Show(vars("dt").Rows(0)("型号"))

--  作者:chen37280600
--  发布时间:2019/9/18 14:09:00
--  
不是这样,我记得是有个啥方法,之前问过的,能做到
dim dt as datatable  = dt1.buildSource() 类似这样效果的

--  作者:有点蓝
--  发布时间:2019/9/18 14:19:00
--  
没听说过
--  作者:小马甲
--  发布时间:2019/9/18 14:52:00
--  
试试  dim dt as datatable  = dt1.ConvetToDataTable()
--  作者:有点蓝
--  发布时间:2019/9/18 15:45:00
--  
是这么一回事。只顾着看属性,忘记看方法了