Foxtable(狐表)用户栏目专家坐堂 → [求助]请名位老师修正一下关于公司人员学历统计的代码


  共有2668人关注过本帖平板打印复制链接

主题:[求助]请名位老师修正一下关于公司人员学历统计的代码

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


加好友 发短信
等级:幼狐 帖子:174 积分:1665 威望:0 精华:0 注册:2018/4/22 18:54:00
[求助]请名位老师修正一下关于公司人员学历统计的代码  发帖心情 Post By:2018/6/25 16:58:00 [只看该作者]

各位老师好,我想统计出来公司各个部门员工不同学历的人数,按照帮助文件写了一段代码,可是代码不能用,请老师指点一下哪里错了,帮我修正一下,谢谢了

Dim b As New SQLGroupTableBuilder("各部门人员文化程度统计表1","公司人员信息表")

b.ConnectionName = "database"

b.Groups.AddDef("部门类别")

b.Totals.AddDef("文化程度", Aggregate.Count "初中")

b.Totals.AddDef("文化程度", Aggregate.Count "高中")

b.Totals.AddDef("文化程度", Aggregate.Count "大学")

 

b.Subtotal = True

b.FromServer = True

b.build()

DataTables("各部门人员文化程度统计表1").SysStyles("Alternate").BackColor = Color.Bisque

MainTable = Tables("各部门人员文化程度统计表1")


 回到顶部