主题：求助各位老师如何实现这样的统计(只有想不到，没有做不到)

谢谢二位版主，这是会计账页的基本模式（有借、贷、余、月计、累计），难道会不支持吗？
请问C版，有关辅助列的内容那里有？

谢谢狐爸支持，期盼您尽快完善。
我虽然购买了开发版只是爱好而已，没有任何商业项目开发。作为一名财务人员，掌握一门好工具是非常受益的，许多工作中的难题你可以迎刃而解，也许你的价值会因此翻倍。
我在克隆正在使用的用友U8网络版，目前卡在账页格式这里了。财务软件因其有自身特有的规则（借贷平衡、复式记账、现金流量、年度结转等）和统一的输出格式（财务报表、记帐凭证、明细账、多栏账等），复杂程度是管理软件里面较高的，只有亲自试一试才能体会其中的精妙，即考验开发软件又锻炼编程人员。

狐爸，我也实现了。
复制如下代码到“订单”命令窗口执行 非常完美。 感谢大家的帮助，集体的智慧是无穷的。C版提示用辅助列，mr725提供了思路。感觉很爽

tables("订单").Redraw = False
if DataTables("订单").datacols.contains("jine") = false 
    DataTables("订单").DataCols.Add("jine", GetType(Double), "","金额")
end if

if DataTables("订单").datacols.contains("fz") = false
    DataTables("订单").DataCols.Add("fz", GetType(integer))
end if
if DataTables("订单").datacols.contains("月") = false
    DataTables("订单").DataCols.Add("月", GetType(double), 5)
end if
for i as integer = 0 to tables("订单").count-1
    Dim dr As Row = Tables("订单").Rows(i)
    dr("月") = right(left(dr("日期"),7),2).trim("-")
    dr("jine")=dr("数量") *dr("单价")* (1- dr("折扣"))
next

Dim yf As List(Of String)
yf = DataTables("订单").GetUniqueValues("", "月")

dim pm as integer
For p As Integer = 0 To yf.Count-1
   
    Dim drs As List(Of DataRow)
    drs = DataTables("订单").Select("[月] = '" & yf(p) & " '")
    For Each dr As Datarow In drs
        dr("fz") =Tables("订单").Compute("Max(fz)")+1
    Next
    Dim mmy As DataRow
    mmy = DataTables("订单").AddNew()'next
    mmy("雇员")="本月合计"
    mmy("数量")=Tables("订单").Compute("Sum(数量)","月 = '" & yf(pm) & "' ")
    mmy("jine")=Tables("订单").Compute("Sum(jine)","月 = '" & yf(pm) & "' ")
    mmy("fz")=Tables("订单").Compute("Max(fz)")+1

    Dim mmz As DataRow
    mmz = DataTables("订单").AddNew()'next
    mmz("雇员")="累    计"
    mmz("数量")=Tables("订单").Compute("Sum(数量)","月 <= '" & yf(pm) & "' ")
    mmz("jine")=Tables("订单").Compute("Sum(jine)","月 <= '" & yf(pm) & "' ")
    mmz("fz")=Tables("订单").Compute("Max(fz)")+1
    pm=pm+1
next
Tables("订单").sort = "fz"
Tables("订单").Cols("金额").Visible = false
Tables("订单").Cols("fz").Visible = false
Tables("订单").Cols("月").Visible = false
tables("订单").Redraw = true