看到统计那一部分,另外你参照销售统计表中的代码 ,同时注意理解:项目事件:MainTableChanged事件中的代码
比如:
Dim dr As DataRow = e.DataRow
Dim dt As DataTable = DataTables("学生成绩")
If e.DataCol.Name = "班级" Then
dr("男生人数") = dt.Compute("count([性别])", "[性别] = '男' and [班级] = '" & dr("班级") & "'" )
dr("女生人数") = dt.Compute("count([性别])", "[性别] = '女' and [班级] = '" & dr("班级") & "'" )
End If
[此贴子已经被作者于2022/7/7 9:31:06编辑过]