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


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

主题：分组统计条件
帅哥哟，离线，有人找我吗？
seal51
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1837 积分：12990 威望：0 精华：0 注册：2013/6/10 9:23:00 		  发帖心情 Post By：2022/6/4 11:37:00 [显示全部帖子]

这段代码加到哪里去呢

 回到顶部
帅哥哟，离线，有人找我吗？
seal51
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1837 积分：12990 威望：0 精华：0 注册：2013/6/10 9:23:00 		  发帖心情 Post By：2022/6/4 11:53:00 [显示全部帖子]

Dim g As New GroupTableBuilder("统计表1", DataTables("accountmx"))

g.Groups.AddDef("日期", DateGroupEnum.Year, "年")

g.Groups.AddDef("日期", "月")

g.Groups.AddDef("来往银行")

g.Totals.AddDef("收入")

g.Totals.AddDef("支出")

g.SubTotal = True

g.FromServer = True

g.Build()

Tables ("统计账目_统计表1" ). DataSource  = g.BuildDataSource

 

 

DataTables("统计表1").DataCols.Add("年月", GetType(String))

For Each dr As DataRow In DataTables("统计表1").DataRows

    dr("年月") = dr("年") & dr("月")

Next
 回到顶部
帅哥哟，离线，有人找我吗？
seal51
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1837 积分：12990 威望：0 精华：0 注册：2013/6/10 9:23:00 		  发帖心情 Post By：2022/6/4 12:05:00 [显示全部帖子]

明白了

 回到顶部
帅哥哟，离线，有人找我吗？
seal51
 小大  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：八尾狐 帖子：1837 积分：12990 威望：0 精华：0 注册：2013/6/10 9:23:00 		  发帖心情 Post By：2022/6/4 13:05:00 [显示全部帖子]

生成统计表后，有个combobox, 获得年月列表，并根据年月筛选统计结果， 下面的代码如何更改呢？
Combobox1代码
Selec tedIndexChanged
Dim g As New GroupTableBuilder("统计表1", DataTables("accountmx"))
g.Groups.AddDef("日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("日期", "月")
g.Groups.AddDef("账目名称")
g.Totals.AddDef("收入")
g.Totals.AddDef("支出")
g.SubTotal = True
g.FromServer = True
g.Filter = "[日期] >= '1/1/" & e.sender.value & "' And [日期] <= '12/31/" & e.sender.value & "'"
g.Build()
Tables ("统计账目_统计表1" ). DataSource  = g.BuildDataSource
Enter
If DataTables.Contains("统计表1") Then
    If DataTables("统计表1").DataCols.Contains("年") Then
        e.sender.combolist = DataTables("统计表1").GetComboListString("年")
    End If
End If
 回到顶部
总数 15 上一页 1 2
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.07031 秒, 5 次数据查询