Dim Arys As List(Of String())
Arys = DataTables("报考情况表").GetUniqueValues("", "分考点名称","试卷号")
For Each Ary As String() In Arys
Dim dt As DataTable =DataTables("报考情况表")
Dim a1 As Short = dt.compute("Count(_Identify)","分考点名称 = 'Ary(0)' And 试卷号 ='Ary(1)'")
Dim dr As DataRow = DataTables("统计过渡表").AddNew()
dr("分考点") = Ary(0)
dr("试卷号") = Ary(1)
dr("报考人数") = a1
Next
最后得到的报考人数都是 0
什么地方出了问题？
Dim a1 As Short = dt.compute("Count(_Identify)","分考点名称 = 'Ary(0)' And 试卷号 ='Ary(1)'")
[此贴子已经被作者于2015/11/9 8:32:53编辑过]
加好友 
发短信
Post By：2015/11/9 8:32:00 [显示全部帖子]
