组合多个统计结果后，如何加分组合计？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 组合多个统计结果后，如何加分组合计？

共有2808人关注过本帖树形打印复制链接主题：组合多个统计结果后，如何加分组合计？

guosheng

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00

组合多个统计结果后，如何加分组合计？ 发帖心情

Post By：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编辑过]

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107747 积分：548074 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/22 9:54:00 [只看该作者]

……

t.SubtotalGroups.Add(g)

t.Subtotal() '生成汇总模式

guosheng

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00

Post By：2021/12/22 10:12:00 [只看该作者]

此主题相关图片如下：微信截图_20211222101031.jpg

如何将table中汇总的最后几行（不知道怎么识别有多少个带 “合计”两个字的行），挪到前几行啊？

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107747 积分：548074 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/22 10:15:00 [只看该作者]

只能这样：http://www.foxtable.com/webhelp/topics/3294.htm

guosheng

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：四尾狐帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00

Post By：2021/12/22 10:27:00 [只看该作者]

能从table的最后一行开始逐行判断，第一个单元格是否含有“合计”这两个字（不知道怎么判断第一个单元），有的话move到前面几行。 table的合计行怎么没有行号啊？

[此贴子已经被作者于2021/12/22 10:30:21编辑过]

有点蓝

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107747 积分：548074 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/12/22 10:30:00 [只看该作者]

分组行没有行号，也无法移动的

下一主题 >> << 上一主题

主题：组合多个统计结果后，如何加分组合计？