主题：[求助]流水账余额的计算

您好！
流水账设计，在DataColChanged事件中，有如下代码
Select Case e.DataCol.Name
Case "收入","支出"
For Each dr As DataRow In e.DataTable.Select("[_SortKey] >= " & e.DataRow("_SortKey"))
Dim Val1 As Double = e.DataTable.Compute("Sum(收入)","[_SortKey] <= " & dr("_SortKey"))
Dim Val2 As Double = e.DataTable.Compute("Sum(支出)","[_SortKey] <= " & dr("_SortKey"))
dr("余额") = Val1 - Val2
Next
End Select


问题：使用Compute计算求和，需要加载所有记录。如果记录太多，比如2014年的记录不加载只加载2015年的记录，使用SQLCompute，余额计算是否正确？
有其他的好办法，恳请各位师兄不吝赐教。


谢谢！