后台数据样子如图(理论上应该是按操作日期排序的,不知道怎么排不了,请忽略)
此主题相关图片如下：收款状态.png
现在得出的效果是
此主题相关图片如下：bf11.png
现有代码在afterload事件中如下:
Dim t As Table = Tables("bf_sj")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = True
t.TreeVisible = False
t.SpillNode = False
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "bf_skzt"
g.TotalOn = "bf_jine"
g.Caption = "{0} 小计"
t.SubtotalGroups.Add(g)
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "bf_carname"
g.TotalOn = ""
g.Caption = "{0} 小计"
t.SubtotalGroups.Add(g)
t.Subtotal()
问题1：怎样才能实现只显示我需要的状态。 比如我只想显示所有状态为“未开”的分组汇总的车辆。 而不是所有“待开”，“已收”，“已结”这些不需要的。
问题2： 小计的数据怎么赋值给窗体上的控件。 比如苏ED0001未开小计金额11674可以通过鼠标选中该行时，赋值到text控件内。
或者说，使用纯代码的话，如何实现将后台数据的内容先按车辆查找，在汇总该车相同状态的金额之和，填充需要的状态内容到到table控件内。
如现在只需要展示“未开”状态的车辆及其金额。 table控件内只需要展示
车号 状态 金额
苏ED0001 未开 168000（后台已经汇总过，下同）
苏ED0003 未开 1800
苏ED0004 未开 10681.07
[此贴子已经被作者于2019/4/28 15:49:03编辑过]
加好友 
发短信
Post By：2019/4/28 15:40:00 [显示全部帖子]
