能帮忙看看这个吗？就是合计列得到的数据是 关联编号列 相同的变动编号的最后的一行的合计
比如 关联编号 有20003、20004等，然后 然后20003 和20004相同的还有变动编号，只算出每一个 关联编号相同的切变动编号最后的一行的合计
就是选择分别选择不同关联编号的变动编号最大增加列数字计算，感谢 感谢
Select Case e.DataCol.Name
Case "项目信息_关联编号","增加"
Dim drs As List(of DataRow)
Dim Filter As String
Filter = "[_SortKey] >= " & e.DataRow("_SortKey") & " And [项目信息_关联编号] = '" & e.DataRow("项目信息_关联编号") & "'"
drs = e.DataTable.Select(Filter)
For Each dr As DataRow In drs
Filter = "[_SortKey] <= " & dr("_SortKey") & " And [项目信息_关联编号] = '" & dr("项目信息_关联编号") & "'"
Dim Val1 As Double = e.DataTable.Compute("Sum(增加)",Filter)
dr("合计") = Val1
Next
End Select '求欠款明细
此主题相关图片如下：360截图-1881453.jpg
[此贴子已经被作者于2017/11/30 17:28:12编辑过]
加好友 
发短信
Post By：2017/11/30 17:13:00 [只看该作者]
