DateSerial을 사용하는 양식 필터가 올바르게 작동하지 않습니다.

Question

다음 달의 처음과 마지막 날짜 사이에 양식을 필터링하려고합니다. 마지막에 대한 나의 코드는 [DateDue] 사이 "월 2013

Public Function DtFrom() As Date 

    DtFrom = DateSerial(Year(Date), Month(Date) + 1, 1) 

End Function 

Me.Filter = "[DateDue] Between #" & DtFrom & "# And #" & (DateSerial(Year(Date), Month(Date) + 2, 1) - 1) & "#" 

Answer 1

01에서 날짜를 반환하는 필터에 내가 원하는 날짜하지만 동일한 코드를 반환 않는 텍스트 상자를 만든 일하러 보인다 # "& DtFrom() &"# 그리고 # "&

당신이 함수 DtFrom()를 호출하고 있는지 '예 당신은 괄호가 필요하게