我要对“员工资料”中的“婚姻状况”字段进行分组统计,“婚姻状况”分为“未婚”、“已婚”、“丧偶”、“离异”、“其它”,录入员有时疏忽有空值,有时填了“无”。语句如下:
Dim b As New crossTableBuilder("统计表1",DataTables("员工资料")) '定义交叉分组表
b.hGroups.AddDef("部门村居","村居")
b.hGroups.AddDef("所站办组","组别")
b.hGroups.AddDef("姓名")
b.vGroups.AddDef("婚姻状况")
b.Totals.AddDef("婚姻状况",AggregateEnum.count)
b.Build
结果空值、离异、已婚、无各1列,丧偶变成了5列,未婚变成了3列。
此主题相关图片如下:工.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2016-6/2016639425721803.png)