此主题相关图片如下:b9yr1gonv{y1b8l~o6j2_x.png
记流水账,我将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
可是上面在支出6608.3的时候余额就不对了,其他都是正确的,请问老师这个怎么破?