0

我正在尝试使用开始日期和结束日期文本框按日期范围过滤连续表格。即使我有符合条件的记录，我的代码也会过滤掉所有内容。我注意到的一个潜在问题（但我不知道如何解决）是我的文本框的格式为“MM/DD/YYYY”，而我的表格字段是日期时间格式。

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 & "#"
4

1 回答 1

1

我想到了。即使该字段最初是日期字段，Access 也将其切换为文本字段，因此我不得不将其转换回日期。

DoCmd.SetFilter wherecondition:="CDate(expFrom) BETWEEN #" & Format(datFrom, "yyyy-m-d") & _
"# AND #" & Format(datTo, "yyyy-m-d") & "#"
于 2016-02-22T22:00:13.343 回答