以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 如何用DateTimePicker查找数据 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=185301) |
-- 作者:min-fox -- 发布时间:2023/2/15 12:36:00 -- 如何用DateTimePicker查找数据 蓝老师,通过窗口中的DateTimePicker1查找数据,如果DateTimePicker1中没有数据,则显示全部,该如何写? Dim ymd As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1") if ymd isnull then Tables("日记列表").Filter = "" end if |
-- 作者:有点蓝 -- 发布时间:2023/2/15 13:37:00 -- Dim ymd As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1") if ymd.value = nothing then Tables("日记列表").Filter = "" else Tables("日记列表").Filter = "日期 = #" & ymd.value & "#" endif
|