蓝老师好!
这段循环计数的代码, count0计数结果不对,是哪里问题?
'''
Dim count As Integer
Dim count0 As Integer
Dim Products As List(Of String)
Products = dt.GetValues("单位","标注 = true")
For Each Product As String In Products
count = 0
......
For Each r As DataRow In dt.Select("单位 = '" & Product & "' and 标注 = true")
count +=1
Next
count0 +=count
Next
msgbox("批量接收 " & count0 & " 条记录")