主题：[求助]分页流水账是否可按项目统计余额

1、参考Foxtable教程里的3.15.25.3非等于比较，写了以下代码

Dim drs As List(of DataRow) = DataTables("表A").Select("", "付款银行,日期") '注意排序参数
drs(0)("余额") = drs(0)("收入") - drs(0)("支出") '设置第一行的余额
For i As Integer = 1 To drs.Count - 1  '从第二行开始逐行计算余额
    If drs(i)(" 付款银行") = drs(i - 1)(" 付款银行") Then
        drs(i)("余额") = drs(i-1)("余额") + drs(i)("收入") -  drs(i)("支出")
    Else
        drs(i)("余额") = drs(i)("收入") -  drs(i)("支出")
    End If
Next

现在我需要求助的是这个代码只能计算当页加载的数据，从加载的第一行算了，不能承接前面的余额，请问代码应该怎么写，虽然教程和foxtable\开发版\CaseStudy案例里有一个分页流水账案例，但它那里没有分那个项目或那个付款银行进行统计余额，如果参照分页流水账的那个案例，应该怎么修改其代码，才可以直接在后台按付款银行进统计余额，谢谢。

我也看了，可是是刚学，不知道怎么去表达修改，想问
此主题相关图片如下：库存表.png

一下有没在分页加载与流水账的例子一的基础上，加多一个例子二

我笨笨的问一句，上传例子？我现在所有的都是连接SQL服务器的数据，是不是把案例和SQL数据库一起上传？

上了例子 ，看怎么样才能按付款银行作为项目统计，每页正确显示每一个付款银行的结余，谢谢

好的，非常感谢，我先试一下，

你好，我不是很明白，想请教一下，为什么下面Afterload事件里的第三条代码只需要e.DataTable.DataCols("支出").RaiseDataColChanged("产品 in ('" & cps & "')")，为什么不需要e.DataTable.DataCols("收入").RaiseDataColChanged("产品 in ('" & cps & "')")，谢谢

Afterload事件

 

If e.DataTable.DataRows.count > 0 Then
   Dim cps As String = e.DataTable.GetComboListString("产品").Replace("|", "','")
   e.DataTable.DataCols("支出").RaiseDataColChanged("产品 in ('" & cps & "')")
End If

这些代码我试了，实现不了，当我加载2015年4月1日的数据，并修改A产品的收入，关掉，再打开加载2015年4月2日A产品数据时，A产品的余额不会承接加上4月1日的余额再加4月2日A产品的收入再减去4月2日A产品的支出

你好，我已经上传例子了，是从foxtable\开发版\CaseStudy里面的分页流水账案例中增加多一列，按付款银行来统计，麻烦你帮我看一下，要怎么修改代码才能实现加载后面的数据时，能衔接上没前面加载的余额，谢谢

我用的是开发版，所以打不开这个商业版的，我再去另一台电脑上装一个试用版的打开来看看

开发版和商业版不知道能不能装在同一个电脑上，我试一下先