- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求教]多表窗口统计 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=133996)
-- 发布时间：2019/4/24 23:17:00
-- [求教]多表窗口统计
在学习文档和论坛中查找了一些多表统计的事例及知识，但对于多表统计还是不清楚，本人所做的统计系统中，就差这两个统计表了，因时间及工作需求关系，特意编写了一些数据，发上来实例，请版主帮写下代码，工作接上后再细细研究这些知识点，万分感谢，希望统计后的结果能达到图上的要求，若不能全实现，请求多实现即可。
此主题相关图片如下：对账.png
-- 发布时间：2019/4/24 23:35:00
--
没看懂你的计算统计逻辑。请举例说明：比如 输入什么值后，点击按钮，得到什么结果。结果由哪些数据通过什么逻辑运算得到。
-- 发布时间：2019/4/25 1:07:00
--
非常抱歉，之前有点急，没想到这些，这样的：先说图一（销售对账）
-- 发布时间：2019/4/25 10:44:00
--
参考代码，理解代码后自己扩展
Dim xm = "中建五局土木工程有限公司:大理市中心城区综合管廊ppp项目-"
Dim g As New CrossTableBuilder("统计表1", DataTables("明细根表"))
g.HGroups.AddDef("销售审核_结算日期")
g.HGroups.AddDef("销售名称")
g.VGroups.AddDef("销售标号")
g.Totals.AddDef("销量", "销量")
g.HorizontalTotal = True
g.filter = "销售名称=\'" & xm & "\'"
Dim dt1 As fxDataSource
dt1 = g.BuildDataSource
Dim g1 As New GroupTableBuilder("统计表2", DataTables("泵送明细"))
g1.Groups.AddDef("销售结算日期")
g1.Groups.AddDef("销售工地名称")
g1.Totals.AddDef("砼方量_签单")
g1.Totals.AddDef("结算_销售")
g1.filter = "销售工地名称=\'" & xm & "\'"
Dim dt2 As fxDataSource
dt2 = g1.BuildDataSource
Dim nms1 As String() = {"销售审核_结算日期","销售名称"} \'指定连接列
Dim nms2 As String() = {"销售结算日期","销售工地名称"} \'指定连接列
dt1.Combine(nms1,dt2,nms2) \'将销售统计数据组合到进货统计数据
dt1.Show("统计表1") \'显示统计结果
-- 发布时间：2019/4/25 10:44:00
--
http://www.foxtable.com/webhelp/scr/2305.htm
-- 发布时间：2019/4/25 12:06:00
--
非常感谢甜版，我理解下，感谢
-- 发布时间：2019/4/25 17:10:00
--
哈哈哈，感谢甜版的指导，我研究成功了，
此主题相关图片如下：微信截图_20190425170826.png
-- 发布时间：2019/4/25 17:26:00
--
现在还有后的三个问题，解决就完美了，
-- 发布时间：2019/4/25 17:41:00
--
1、3：生成统计表后遍历所有行，给单元格赋值