连续表格日期过滤器
Continuous form date filter
我正在尝试使用开始日期和结束日期文本框按日期范围过滤连续表单。我的代码只是过滤掉所有内容，即使我有符合条件的记录。我注意到的一个潜在问题（但我不知道如何解决）是我的文本框格式为 "MM/DD/YYYY" 而我的 table 字段是日期时间格式。
Dim datFrom As Date, datTo As Date
datFrom = txtFrom.Value
datTo = txtTo.Value
Debug.Print datFrom
Debug.Print datTo
DoCmd.SetFilter wherecondition:="expFrom BETWEEN #" & datFrom & "# AND #" & datTo & "#"
我明白了。尽管该字段最初是日期字段，但 Access 正在将其切换为文本字段，因此我不得不将其转换回日期。
DoCmd.SetFilter wherecondition:="CDate(expFrom) BETWEEN #" & Format(datFrom, "yyyy-m-d") & _
"# AND #" & Format(datTo, "yyyy-m-d") & "#"
我正在尝试使用开始日期和结束日期文本框按日期范围过滤连续表单。我的代码只是过滤掉所有内容，即使我有符合条件的记录。我注意到的一个潜在问题（但我不知道如何解决）是我的文本框格式为 "MM/DD/YYYY" 而我的 table 字段是日期时间格式。
Dim datFrom As Date, datTo As Date
datFrom = txtFrom.Value
datTo = txtTo.Value
Debug.Print datFrom
Debug.Print datTo
DoCmd.SetFilter wherecondition:="expFrom BETWEEN #" & datFrom & "# AND #" & datTo & "#"
我明白了。尽管该字段最初是日期字段，但 Access 正在将其切换为文本字段，因此我不得不将其转换回日期。
DoCmd.SetFilter wherecondition:="CDate(expFrom) BETWEEN #" & Format(datFrom, "yyyy-m-d") & _
"# AND #" & Format(datTo, "yyyy-m-d") & "#"