以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 交叉统计行、列排序问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78258) |
-- 作者:HJG_HB950207 -- 发布时间:2015/12/5 11:25:00 -- 交叉统计行、列排序问题 请教: Dim g As New CrossTableBuilder("用工形式", DataTables("职工一览表")) g.HGroups.AddDef("科室") g.VGroups.AddDef("用工形式") g.VGroups.AddDef("性别") g.Totals.AddDef("性别", AggregateEnum.Count, "性别") g.HorizontalTotal = True g.VerticalTotal = True g.Subtotal = True g.FromServer = True g.Build() MainTable = Tables("用工形式") 假如职工一览表中 科室列有对应的科室编号 用工形式也有对应的序号 如何使交叉统计的表的行按科室编号排(而不是按拼音第一个字母);列按用工形式的序号排。 谢谢! |
-- 作者:Hyphen -- 发布时间:2015/12/5 12:15:00 -- 增加科室编号和用工形式序号列到统计表,生成后再隐藏科室编号和用工形式序号 Dim g As New CrossTableBuilder("用工形式", DataTables("职工一览表")) g.HGroups.AddDef("科室编号") g.HGroups.AddDef("科室") g.VGroups.AddDef("用工形式序号") g.VGroups.AddDef("用工形式") g.VGroups.AddDef("性别") g.Totals.AddDef("性别", AggregateEnum.Count, "性别") g.HorizontalTotal = True g.VerticalTotal = True g.Subtotal = True g.FromServer = True g.Build() MainTable = Tables("用工形式") Tables("用工形式").Cols("科室编号").Visible = False Tables("用工形式").grid.Rows(0).Visible = False |