以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]时间如何来比较?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=49633)

--  作者:737182811
--  发布时间:2014/4/21 18:27:00
--  [求助]时间如何来比较?
以下代码用的的是狐爸帮助中的例子,有一个不同,就是创建时间的格式是datetime.
那我要筛选出当日的数据,如何修改呢?

        Case 3
            Dim y As Integer = value(0)
            Dim m As Integer = value(1)
            Dim d As Integer = value(2)
            d1 = New Date(y, m, d) \'取得该日
            Filter = "创建时间 = #" & d1 & "# And 客户名称 = \'" & Value(3) & "\'"

--  作者:有点甜
--  发布时间:2014/4/21 18:46:00
--  

 这样写

 

Filter = "创建时间 >= #" & Date.Today & "# And 创建时间 < #" & Date.Today.Add(1) & "# And 客户名称 = \'" & Value(3) & "\'"


--  作者:737182811
--  发布时间:2014/4/21 22:45:00
--  
谢甜版.
            Filter = "创建时间 >= #" & d1 & "# And 创建时间 < #" & d1.adddays(1) & "#"