2015-06-17 44 views
1

這應該很簡單,但它不工作,我知道我以前做過。從窗體傳遞日期條件到Access中的查詢

我有一個窗體上的日期字段:

enter image description here

屬性設置爲日期字段ShortDate:

enter image description here

我有一些代碼在確保它始終設置爲月份的最後一天:

Me.txtReportDate.SetFocus 
Me.txtReportDate.Text = DateAdd("d", -1, DateSerial(Year(Forms!frmRunQueries.txtReportDate), Month(Forms!frmRunQueries.txtReportDate) + 1, 1)) 
Me.Refresh 

並在查詢,我設置的一個日期等於表單上的日期: enter image description here

如果我設置爲:

=#5/31/15# 

我得到的數據。如果我把它與現場參考放在一起,我不會。關於我可能做錯什麼的想法?

+0

如果你使用'[表格]它是做什麼[! frmRunQueries]![txtReportDate] .Text'? – Newd

+0

什麼'SELECT Forms!frmRunQueries.txtReportDate'顯示你? – HansUp

+0

我去了立即窗口並輸入?Forms!frmRunQueries.txtReportDate。它回吐5/31/2015。然而,查詢沒有得到結果,並且至少有2000條記錄應該返回。 –

回答

0

你不應該使用文本,但價值:

Me!txtReportDate.SetFocus 
Me!txtReportDate.Value = DateSerial(Year(Forms!frmRunQueries!txtReportDate), Month(Forms!frmRunQueries!txtReportDate) + 1, 0) 
Me.Refresh 

此外,在查詢中,指定一個參數:Forms!frmRunQueries!txtReportDate日期/時間