以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  组合多个统计结果后,如何加分组合计?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173909)

--  作者:guosheng
--  发布时间:2021/12/22 9:38:00
--  组合多个统计结果后,如何加分组合计?
Dim nms As String() = {"项目名称","合同编号","客户名称"} \'指定连接列
dt1.Combine(nms,dt3,nms)
dt1.Combine(nms,dt2,nms)
dt1.Show("统计表2") \'显示统计结果,必须有这一句
DataTables("统计表2").DataCols.Add("当期应缴税", Gettype(Double), "convert(   ( IsNull([应收应缴税额],0)-IsNull([累计已缴税],0) )*100,\'System.Int64\'   )/100")

以下代码设置了没有起到分组统计的作用啊。
Dim t As Table = Tables("统计表2")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
\'定义客户分组
g = New Subtotalgroup 
g.GroupOn = "项目名称" 
g.TotalOn = "当期应缴税,不含税租金" 
t.SubtotalGroups.Add(g) 
[此贴子已经被作者于2021/12/22 9:38:39编辑过]

--  作者:有点蓝
--  发布时间:2021/12/22 9:54:00
--  
……
t.SubtotalGroups.Add(g) 
t.Subtotal() \'生成汇总模式
--  作者:guosheng
--  发布时间:2021/12/22 10:12:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20211222101031.jpg
图片点击可在新窗口打开查看

如何将table中汇总的最后几行(不知道怎么识别有多少个带 “合计”两个字的行),挪到前几行啊?
--  作者:有点蓝
--  发布时间:2021/12/22 10:15:00
--  
只能这样:http://www.foxtable.com/webhelp/topics/3294.htm
--  作者:guosheng
--  发布时间:2021/12/22 10:27:00
--  
能从table的最后一行开始逐行判断,第一个单元格是否含有“合计”这两个字(不知道怎么判断第一个单元),有的话move到前面几行。 table的合计行怎么没有行号啊?
[此贴子已经被作者于2021/12/22 10:30:21编辑过]

--  作者:有点蓝
--  发布时间:2021/12/22 10:30:00
--  
分组行没有行号,也无法移动的