以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  日期筛选  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113083)

--  作者：有点蓝 --  发布时间：2018/1/8 22:11:00 --   With e.Form.Controls("出库日期2")     If .Value IsNot Nothing Then         If Filter >"" Then             Filter = Filter & " And "         End If         Filter = Filter & "出库日期 < #" & .Value.adddays(1) & "#"     End If End With