多行一样的数据，如何累计现场单总套数 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If e.DataCol.name = "计划数量" Then

Dim Filter3 As String = "[生产piao号] = '" & e.DataRow("生产piao号") & "' and [制造产品号] = '" & e.DataRow("制造产品号") & "'"

Dim drs3 As List(Of DataRow) = DataTables("现场任务单").Select(Filter3)

For i As Integer = 0 To drs3.count - 1

If i = 0

drs3(0)("现场单累计套数") = drs3(0)("计划数量")

Else

drs3(i)("现场单累计套数") = drs3(i-1)("现场单累计套数") + drs3(i)("计划数量")

End If

我改成上面那样就可以了。

主题：多行一样的数据，如何累计现场单总套数