Dim dt1 s Date = e.Form.Controls("起始日期填写").Value Dim dt2 s Date = e.Form.Controls("结束日期填写 ").Value
Tables("主要生产原材料进料统计").Filter = "[日期] >= #" & dt1 & "# And [日期] <= #" & dt2 & "#"
加好友 
发短信
Post By：2013/6/5 11:06:00 [显示全部帖子]
