以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  平均数问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=92430)
--  作者：HJG_HB950207
--  发布时间：2016/11/3 11:16:00
--  平均数问题
表A  
    姓名   部门     年龄
    
    张三    A         24
    李四    A         36
    王五    B         43
    马六    B         24
    胡七    C         31

    我想得到这样一张表
    部门    人数     平均年龄
      A
      b
      c
     合计                 ？
    此表分类合计好计算，但合计中的平均年龄不好计算，它简单把各部门平均年龄相加了。
     
--  作者：有点蓝
--  发布时间：2016/11/3 11:42:00
--  
代码处理一下

Dim g As New GroupTableBuilder("统计表2", DataTables("表C"))
g.Groups.AddDef("部门")
g.Totals.AddDef("姓名", AggregateEnum.Count,"人数")
g.Totals.AddDef("年龄", AggregateEnum.Average,"平均")
g.VerticalTotal = True
g.Build()
MainTable = Tables("统计表2")
Dim r As Row = Tables("统计表2").Rows(Tables("统计表2").Rows.Count(True) - 1)
r("平均") = Tables("表C").Compute("Avg(年龄)")