老师，以下代码错在那里（重置列时出现闪退）？代码加在“学费汇总表”的datacolchanged上，实现对"学年收费名单表"根据学年进行应收费、实收费、欠费汇总求和。谢谢。
For Each nm As String In DataTables("学年收费名单").GetValues("学年")
Dim dr As DataRow = DataTables("学费汇总").AddNew()
dr("学年")= nm
dr("人数") = DataTables("学年收费名单").getvalues("身份证", "学年='" & dr("学年") & "'").count
dr("应收费") = DataTables("学年收费名单").Compute("sum(应收费)", "学年='" & dr("学年") & "'")
dr("实收费") = DataTables("学年收费名单").Compute("sum(实收费)", "学年='" & dr("学年") & "'")
dr("欠费") = DataTables("学年收费名单").Compute("sum(欠费)", "学年='" & dr("学年") & "'")
Next
加好友 
发短信
Post By：2018/10/17 11:44:00 [只看该作者]
