看这个帮助
http://www.foxtable.com/webhelp/scr/2305.htm
也就是你要写两段
Dim g As New GroupTableBuilder("学生统计", DataTables("学生信息"))
Dim dt1 As Table = Tables("学生统计_table1")
g.Groups.AddDef("学校名称")
g.Groups.AddDef("年级")
g.Groups.AddDef("班级")
g.Totals.AddDef("性别",AggregateEnum.Count,"男")
g.Filter = "性别 = '男'"
g.FromServer = True