以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助 有关报表的问题!!!  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=44857)

--  作者:myzzip
--  发布时间:2014/1/10 13:02:00
--  求助 有关报表的问题!!!
Tables("报表窗口_Table1").ExtendLastCol = True
Dim bd1 As New GroupTableBuilder("统计表1",DataTables("零售明细"))
Dim dt1 As fxDataSource
bd1.Filter = "[日期] = \'" & Date.Today.Month & "\'"  这里的代码报错,原因我知道,但是我想要的就是当月数据 有什么办法能实现?
bd1.Groups.AddDef("名称") \'根据名称分组
bd1.Totals.AddDef("数量","零售_数量") \'对数量进行统计
bd1.Totals.AddDef("实收金额","零售_金额") \'对金额进行统计
dt1 = bd1.BuildDataSource()

--  作者:lsy
--  发布时间:2014/1/10 13:52:00
--  
大于等于当月第一天,小于等于当月最后一天。
--  作者:Bin
--  发布时间:2014/1/10 14:06:00
--  
参考一下这里 http://www.foxtable.com/help/topics/2720.htm