Foxtable(狐表)用户栏目专家坐堂 → 统计


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

主题:统计

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


加好友 发短信
等级:八尾狐 帖子:1942 积分:14943 威望:0 精华:0 注册:2016/4/28 9:58:00
统计  发帖心情 Post By:2016/12/9 9:30:00 [只看该作者]

Dim g As New GroupTableBuilder("统计表1", DataTables("学生信息"))
g.Groups.AddDef("学校名称")
g.Groups.AddDef("班级")
g.Groups.AddDef("性别")
g.Totals.AddDef("学生姓名", AggregateEnum.Count,"学生人数")
g.Totals.AddDef("学生姓名", AggregateEnum.Count,"男")
g.FromServer = True
g.Build()
MainTable = Tables("统计表1")
Dim school As String = User.Group
Tables("统计表1").filter = "学校名称 = '"& school &"'"

老师,请问上面代码是将一个班的男,女纵向两行分别统计,我是想横向一列统计总数,一列统计该班男生数,一列统计该班女生数,请问怎么改。谢谢


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


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


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


加好友 发短信
等级:八尾狐 帖子:1942 积分:14943 威望:0 精华:0 注册:2016/4/28 9:58:00
  发帖心情 Post By:2016/12/9 11:31:00 [只看该作者]

Dim dt1 As Table = Tables("学生人数统计_table1")
Dim g As New CrossTableBuilder("统计表1",DataTables("学生信息"))
g.hGroups.AddDef("学校名称")
g.hGroups.AddDef("班级")
g.vgroups.AddDef("性别")
g.Totals.AddDef("学生姓名", AggregateEnum.Count,"学生人数")
g.Totals.AddDef("性别", AggregateEnum.Count,"性别")
g.FromServer = True
g.Build()
MainTable = Tables("统计表2")
Dim school As String = User.Group
dt1.DataSource = g.BuildDataSource()
dt1.filter = "学校名称 = '"& school &"'"
我想用一列来统计每个班的人数,再分别统计男,女各一列,上面代码是将性别下分别统计人数,没有总人数列,我看了懂不起,请帮改下



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


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

Dim dt1 As Table = Tables("学生人数统计_table1")
Dim g As New CrossTableBuilder("统计表1",DataTables("学生信息"))
g.hGroups.AddDef("学校名称")
g.hGroups.AddDef("班级")
g.vgroups.AddDef("性别")
g.Totals.AddDef("学生姓名", AggregateEnum.Count,"学生人数")
g.HorizontalTotal = True
g.FromServer = True
g.Build()
MainTable = Tables("统计表2")
Dim school As String = User.Group
dt1.DataSource = g.BuildDataSource()
dt1.filter = "学校名称 = '"& school &"'"
[此贴子已经被作者于2016/12/9 11:43:10编辑过]

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


加好友 发短信
等级:八尾狐 帖子:1942 积分:14943 威望:0 精华:0 注册:2016/4/28 9:58:00
  发帖心情 Post By:2016/12/9 12:42:00 [只看该作者]

Dim dt1 As Table = Tables("学生人数统计_table1")
Dim g As New CrossTableBuilder("统计表1",DataTables("学生信息"))
g.hGroups.AddDef("学校名称")
g.hGroups.AddDef("班级")
g.vgroups.AddDef("性别")
g.vgroups.AddDef("就读方式")
g.Totals.AddDef("学生姓名", AggregateEnum.Count,"学生人数")
g.HorizontalTotal = True
g.FromServer = True
g.Build()
MainTable = Tables("统计表2")
Dim school As String = User.Group
dt1.DataSource = g.BuildDataSource()
dt1.filter = "学校名称 = '"& school &"'"
老师,我加了个就读方式统计,是想统计出该班走读和住读,结果是男女分类下又分走读,住读,如果按班统计走读,住读,男生,女生,总数5列分别是多少,怎么改?

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


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

分别生成2个统计表然后合并:http://www.foxtable.com/webhelp/scr/2305.htm

 回到顶部