Foxtable(狐表)用户栏目专家坐堂 → [求助]分组统计如何把件数和金额列到一行?


  共有1797人关注过本帖树形打印复制链接

主题:[求助]分组统计如何把件数和金额列到一行?

帅哥哟,离线,有人找我吗?
新福星
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1964 积分:15604 威望:0 精华:0 注册:2011/7/16 20:59:00
[求助]分组统计如何把件数和金额列到一行?  发帖心情 Post By:2016/11/24 8:01:00 [只看该作者]

Dim t As Table = Tables("订单")
Dim
g As SubtotalGroup
t.SubtotalGroups.Clear()
'
定义客户分组
g = New SubtotalGroup '
定义一个新的分组
g.Aggregate = AggregateEnum.Sum '
统计类型为求和
g.GroupOn = "
客户" '分组列为客户
g.TotalOn = "
数量,金额" '统计数量和金额列
g.Caption = "{0}
小计" '设置标题
t.SubtotalGroups.Add(g) '
加到分组集合中
'
定义产品分组
g = New SubtotalGroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "
产品"
g.TotalOn = "
数量,金额"
g.Caption = "{0}
小计"
t.SubtotalGroups.Add(g)
'
定义总计分组
g = New SubtotalGroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*" '
注意总计分组用符号*表示。
g.TotalOn = "
数量,金额"
g.Caption = "
总计"
t.SubtotalGroups.Add(g)
t.Subtotal() '

这是教材中的例子。现在想要统计金额和件数,如何把AggregateEnum.SumAggregateEnum.Count的结果放到一列上呢?



 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110597 积分:562881 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/11/24 8:45:00 [只看该作者]


 回到顶部