Dim d As Date = Date.Today
Dim drs = datatables("").select("用餐时间 >= #" & d & "# and 用餐时间 <= #" & d.AddHours(12) & "#")
加好友 
发短信
Post By：2018/9/3 14:07:00 [显示全部帖子]
