2

我原以为Form!MyForm!Date >= #1/12/2010#会做到这一点,但它似乎没有奏效。

有人可以阐明我做错了什么吗

完整代码:

If (Forms!MyForm!DateSubmitted >= #1/01/2012#) Then
MsgBox ("Past due date")
End If
4

1 回答 1

2

使用 CDate 函数至少可以确保您正在比较两个日期:

If (CDate(Forms!MyForm!DateSubmitted) >= #1/1/2012#) Then
    MsgBox ("Past due date")
End If

如果您的输入字符串不是有效的日期字符串,您将收到类型错误,但您会知道您没有将日期类型与日期进行比较。

另外,检查您比较的有效日期:

Form!MyForm!Date >= #1/12/2010# '2010

对比

Forms!MyForm!DateSubmitted >= #1/01/2012# '2012
于 2012-04-22T08:18:06.667 回答