以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何按年显示不同年份的数据 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=128801) |
||||
-- 作者:dokings -- 发布时间:2018/12/15 13:05:00 -- 如何按年显示不同年份的数据 如果在窗体上按年筛选显示数据? 比如选择2018,,,显示2018年的所有数据? 不想用树来分类,,, 能不能告诉我这个筛选代码怎么弄?
|
||||
-- 作者:有点蓝 -- 发布时间:2018/12/15 14:02:00 -- 参考:http://www.foxtable.com/webhelp/scr/2720.htm |
||||
-- 作者:dokings -- 发布时间:2018/12/15 14:08:00 -- 这个只有筛选特定某年的,,,不同年份怎么写? |
||||
-- 作者:有点蓝 -- 发布时间:2018/12/15 14:18:00 -- 怎么样的不同年份?举例说明 |
||||
-- 作者:dokings -- 发布时间:2018/12/15 14:44:00 -- 有2015, 2016, 2017, 2018,,,这样不同年份的,,, 我看了下你发的那个代码,只能筛选其中一年,,,能不能看下我发的例子,告诉我应该怎么写这个代码?
|
||||
-- 作者:有点蓝 -- 发布时间:2018/12/15 14:59:00 -- Dim y As Integer = val(e.Form.Controls("ComboBox1").text) \'指定年份 Dim dt1 As New Date(y, 1, 1) Dim dt2 As New Date(y, 12, 31) Dim Filter As String Filter = "日期 >= #" & dt1 & "# And 日期 <= #" & dt2 & "#" Tables("订单").Filter = Filter |
||||
-- 作者:dokings -- 发布时间:2018/12/16 10:52:00 -- 这个可行,,,,谢谢版主帮助 |