交叉分组问题请教 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 交叉分组问题请教

共有2008人关注过本帖树形打印复制链接主题：交叉分组问题请教

HJG_HB950207

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：394 积分：6003 威望：0 精华：0 注册：2015/2/17 10:18:00

交叉分组问题请教 发帖心情

Post By：2017/5/28 10:01:00 [显示全部帖子]

表A1

收费员日期班次收费金额

：

班次分白、晚、夜

请教代码，用交叉分组模式，计算这段时间内各服务员上了多少白班、晚班、夜班？

谢谢！

HJG_HB950207

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：394 积分：6003 威望：0 精华：0 注册：2015/2/17 10:18:00

Post By：2017/5/28 10:32:00 [显示全部帖子]

不好意思，已OK，两次交叉就可以

HJG_HB950207

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：394 积分：6003 威望：0 精华：0 注册：2015/2/17 10:18:00

2次合计

Post By：2017/5/30 15:13:00 [显示全部帖子]

Dim g As New GroupTableBuilder("收费清单", DataTables("表A1"))

g.Groups.AddDef("日期")

g.Groups.AddDef("收费员")

g.Groups.AddDef("班次")

g.Totals.AddDef("班次", AggregateEnum.Count, "出口次数")

g.Totals.AddDef("金额")

g.Build()

MainTable = Tables("收费清单")

Dim g1 As New CrossTableBuilder("值班统计", DataTables("收费清单"))

G1.HGroups.AddDef("收费员")

G1.VGroups.AddDef("班次")

G1.Totals.AddDef("班次", AggregateEnum.Count, "值班次数")

G1.Totals.AddDef("出口次数", "出口车次")

G1.Totals.AddDef("金额", "金额")

G1.HorizontalTotal = True

G1.VerticalTotal = True

G1.Build()

主题：交叉分组问题请教