生成统计表后，有个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
加好友 
发短信
Post By：2022/6/4 13:05:00 [只看该作者]
