你的筛选代码是怎么写的？如果有时间，需要这样写
Dim d As Date = e.form.controls("datetimepicker1").Value
Tables("xxx").Filter = "日期 >= #" & d & "# and 日期 <# " d.addDays(1) " #"
加好友 
发短信
Post By：2014/5/14 16:38:00 [显示全部帖子]
