- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 筛选订单日期如何可以安年月筛选 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=101222)
-- 发布时间：2017/5/26 21:38:00
-- 筛选订单日期如何可以安年月筛选
Hi 大家好！
-- 发布时间：2017/5/26 22:27:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:测试表.table |
-- 发布时间：2017/5/26 22:45:00
--
谢谢，不过我一改订单日期和增加新订单日期还不能自动更新出新筛选项目，应该如何添加代码
-- 发布时间：2017/5/26 23:03:00
--
修改后马上保存就可以了。
-- 发布时间：2017/5/27 6:16:00
--
嗯，明白。谢谢
-- 发布时间：2017/6/16 16:21:00
--
请教，在临时表内如何才能把开始日期至终点日期进行筛选出来
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:模拟关联表.rar |
此主题相关图片如下：qq截图20170616161922.jpg
-- 发布时间：2017/6/16 17:52:00
--
Dim filter As String
With e.Form.Controls("DateTimePicker1")
If .Value IsNot Nothing Then
If Filter >"" Then
Filter = Filter & " And "
End If
Filter = Filter & "日期 >= #" & .Value & "#"
End If
End With
With e.Form.Controls("DateTimePicker2")
If .Value IsNot Nothing Then
If Filter >"" Then
Filter = Filter & " And "
End If
Filter = Filter & "日期 <= #" & .Value & "#"
End If
End With
Dim bd1 As New GroupTableBuilder("统计表1",DataTables("订单"))
Dim dt1 As fxDataSource
bd1.Groups.AddDef("客户编号")
bd1.Totals.AddDef("数量","总数量") \'对数量进行统计
bd1.Totals.AddDef("金额","总")
bd1.Filter = filter
bd1.Totals.AddDef("金额",AggregateEnum.Min,"最小值")
dt1 = bd1.BuildDataSource()
Dim t As Table = Forms("窗口2").controls("Table1").Table
t.DataSource = dt1 \'将统计结果绑定到Table
-- 发布时间：2017/6/17 9:43:00
--
谢谢！
-- 发布时间：2017/6/17 9:44:00
--
查找代码没反应
-- 发布时间：2017/6/17 10:06:00
--
你是想统计后再按日期范围进行筛选？还是想按日期范围进行统计？