主题：交叉统计

Dim sq2 As String = "Select  a.学期,a.班级,b.学生姓名,a.计划人数 F rom {缴费标准} a left join (Select  学期,班级,缴费项目,学生姓名,fa piao号 F rom {缴费信息} WHERE 缴费项目 = '"& e.F orm.Controls("缴费项目").text & "' And fa piao号 not In (Select  fa piao号 F rom {退费信息})) b ON a.学期 = b.学期 And a.班级 = b.班级 where a.学期 = '"& XQ &"' and a.缴费项目 ='学费'"
       Dim b As New CrossTableBuilder("统计表2",sq2, "数据库")
       b.HGroups.AddDef("学期")
       b.VGroups.AddDef("班级")
       b.Totals.AddDef("学生姓名",AggregateEnum.Count，“学生数”)
       b.HorizontalTotal = True

计划人数-学生数=可招人数

请教代码怎么改？谢谢