我有一个名为tblAuditForms的表。该表包括一个称为AuditDate的日期列。该表以“短日期”格式存储日期，因此时间未存储在表中。我想从该表中选择日期匹配6/11/2020的记录。我已经确认表中包含此日期的记录很多。
这是我到目前为止的内容：
Dim myAuditDate As Date
Dim db As DAO.Database
Dim rst As DAO.Recordset2
Dim strSQL As String
myAuditDate = CDate("6/11/2020")
set db = CurrentDb
strSQL = "SELECT * FROM tblAuditForms WHERE AuditDate = " & Format(myAuditDate, "mm/dd/yyyy") & ";"
Set rst = db.OpenRecordset(strSQL)
rst.MoveFirst
该代码一直到失败的rst.MoveFirst行。似乎记录集为空。如前所述，我知道该表包含我提供的该日期的记录。我怀疑问题出在我的SQL语句的格式上，但我不知道怎么做。我也用＃个字符包围了日期，但这似乎没有帮助。在创建记录集时，在日期前后包含'字符也会失败。
感谢您的帮助。谢谢！
进一步检查我的表后，我发现AuditDate字段实际上也在存储时间。这是因为这些特定记录已使用单独的VBA宏插入到表中，并且不受任何验证规则的约束。
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句