主题：[求助][求助]如何将各产品的最后库存筛选出来。

流水帐列二：

          如何将各产品的最后库存筛选出来。在一张表上反映。

提问请到“专家坐堂”版块。

办法有很多的，以下例子以分组统计，然后再进行计算。

Dim g As New GroupTableBuilder("库存表", DataTables("例子二"))
g.Groups.AddDef("产品")
g.Totals.AddDef("库存")
g.Build()
Dim dt As DataTable = DataTables("例子二")
For Each dr As DataRow In DataTables("库存表").DataRows
    dr("库存") = dt.Compute("Sum(入库)","产品 = '" & dr("产品") & "'") - dt.Compute("Sum(出库)","产品 = '" & dr("产品") & "'")
Next