以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  请教问题：按年、月份统计班数如操作？谢谢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=101865)

--  作者：山岳 --  发布时间：2017/6/8 17:07:00 --  请教问题：按年、月份统计班数如操作？谢谢 请教问题：按年、月份统计班数如操作？谢谢  下载信息  [文件大小：   下载次数： ] 点击浏览该文件:请教问题：按年、月份统计班数如操作？谢谢.zip

--  作者：山岳 --  发布时间：2017/6/8 17:14:00 --   请老师给看看

--  作者：有点蓝 --  发布时间：2017/6/8 17:38:00 --   需要做2次统计  下载信息  [文件大小：   下载次数： ] 点击浏览该文件:管理项目1.table

--  作者：山岳 --  发布时间：2017/6/8 17:57:00 --   Dim dt As DataTable = DataTables("表A") Dim g As New GroupTableBuilder("统计表1", dt) g.Groups.AddDef("日期", DateGroupEnum.Year, "年") g.Groups.AddDef("日期", "月") g.Totals.AddDef("班级名称", AggregateEnum.Count, "人数") g.Build() Dim t As Table = Tables("统计表1") For Each r As Row In t.Rows     Dim d As Date = new Date(r("年"), r("月"), 1)     Dim count As Integer = dt.GetValues("姓名", "日期 >= #" & d & "# and 日期 < #" & d.AddMonths(1) & "# ").count     r("人数") = count Next

--  作者：山岳 --  发布时间：2017/6/8 17:58:00 --   年、月和日参数描述无法表示的 DateTime。

--  作者：山岳 --  发布时间：2017/6/8 17:59:00 --   请老师指教

--  作者：有点蓝 --  发布时间：2017/6/8 18:06:00 --   Dim g As New GroupTableBuilder("统计表1", DataTables("表A")) g.Groups.AddDef("班级名称") g.Groups.AddDef("日期", DateGroupEnum.Year, "年") g.Groups.AddDef("日期", "月") g.Totals.AddDef("班级名称", AggregateEnum.Count, "人数") Dim dt As DataTable = g.Build(True) g = New GroupTableBuilder("统计表2", dt) g.Groups.AddDef("年") g.Groups.AddDef("月") g.Totals.AddDef("班级名称", AggregateEnum.Count,"班数") g.Build() MainTable = Tables("统计表2")

--  作者：山岳 --  发布时间：2017/6/8 21:25:00 --   太神奇，谢谢 ，我一定要好好学习