Foxtable(狐表)用户栏目专家坐堂 → 分组统计问题


  共有3627人关注过本帖树形打印复制链接

主题:分组统计问题

帅哥哟,离线,有人找我吗?
裴保民
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:2006 积分:12772 威望:0 精华:0 注册:2017/4/3 15:01:00
分组统计问题  发帖心情 Post By:2020/2/25 17:50:00 [显示全部帖子]

Dim flb As WinForm.RadioButton = e.Form.Controls("flRadioButton")
Dim fltab As WinForm.TabControl = e.Form.Controls("flymTabContro")
Dim aszlx As WinForm.RadioButton = e.Form.Controls("asjdcxRadioButton")
Dim g As New GroupTableBuilder("统计表1", DataTables("收支交易流水"))
If aszlx.Checked=True Then
    g.Groups.AddDef("所属账户","账户名称")
    g.Totals.AddDef("单号", AggregateEnum.Count,"笔数")
    g.Totals.AddDef("收入金额","金额")    
    g.Totals.AddDef("收入金额", AggregateEnum.Average, "每笔平均金额")
    g.Filter = "[交易类型] ='收入'"
    g.Build()
    MainTable = Tables("统计表1")
    Tables("收入明细窗体_srTable").DataSource = DataTables("统计表1")
    Tables("收入明细窗体_srTable").SetColVisibleWidth("账户名称|200|笔数|160|金额|300|每笔平均金额|300")
For Each c As Col In Tables("收入明细窗体_srTable").Cols
    c.TextAlign = TextAlignEnum.Center
Next
End If


这样是统计整个表的数据,这样统计某 一时间段内的数据呀?假如只统计本年内的数据怎么写呢?
[此贴子已经被作者于2020/2/25 17:51:16编辑过]

 回到顶部