以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  组合统计结果  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=125548)

--  作者:Hareen时代
--  发布时间:2018/9/30 14:35:00
--  组合统计结果
 组合两个统计结果的时候,将dt2合并到dt1上不能显示,将dt1合并到dt2上就可以显示!


这个是为什么呢 

--  作者:有点蓝
--  发布时间:2018/9/30 14:42:00
--  
将dt2合并到dt1上要显示dt1:dt1.Show("统计表1")
将dt1合并到dt2上要显示dt2:dt2.Show("统计表2")

--  作者:Hareen时代
--  发布时间:2018/9/30 14:48:00
--  
后面这个都修改了,貌似和这个没有关系
--  作者:有点蓝
--  发布时间:2018/9/30 15:04:00
--  
贴出你完整代码
--  作者:Hareen时代
--  发布时间:2018/9/30 15:17:00
--  
Dim bm As String = "商超贷KS"

Dim g As New CrossTableBuilder(bm, DataTables("实际基表"))
Dim dt As fxDataSource
g.HGroups.AddDef("项目")
g.HGroups.AddDef("指标")
g.VGroups.AddDef("年月","实际_{0}")
g.Totals.AddDef("数值", "数值")
Output.Show(s1)
g.Filter = "年月 in (" & s1 & ")"
\'g.Build
dt = g.BuildDataSource


Dim g1 As New CrossTableBuilder("统计表1", DataTables("预测基表"))
Dim dt1 As fxDataSource
g1.HGroups.AddDef("项目")
g1.HGroups.AddDef("指标")
g1.VGroups.AddDef("年月","预测_{0}")
g1.Totals.AddDef("数值", "数值")
dt1 = g1.BuildDataSource

Dim nms As String() = {"项目","指标"}
dt.Combine(nms,dt1,nms)
dt.show(bm)
Tables(bm).AutoSizeCol("项目")
Tables(bm).AutoSizeCol("指标")
MainTable = Tables(bm)


--  作者:有点蓝
--  发布时间:2018/9/30 15:55:00
--  
上面的代码有问题吗?你需要实现什么功能
--  作者:Hareen时代
--  发布时间:2018/9/30 16:04:00
--  
上面的代码最后报错,我想组合两个统计结果,将dt1组合到dt上就报错,但是将dt组合到dt1上就可以


--  作者:有点蓝
--  发布时间:2018/9/30 16:18:00
--  
报什么错误?
--  作者:Hareen时代
--  发布时间:2018/9/30 17:56:00
--  
报某一列已经存在该表中
--  作者:有点甜
--  发布时间:2018/10/4 11:11:00
--  
以下是引用Hareen时代在2018/9/30 17:56:00的发言:
报某一列已经存在该表中

 

做个实例发上来测试。