Ms access 访问VBA比较日期不起作用

我比较日期有困难。我的代码中的if语句表示endDate不小于，即使它是。例如，如果结束日期为2017年2月20日，开始日期为2017年2月22日，则if语句表示结束日期不是最晚，而是最晚

    Dim startDate As Date
    Dim endDate As Date

        startDate = DateValue(Me.dueDateTxt)
        endDate = DateValue(Me.shippedDate)

        If (endDate < startDate) Then
            Debug.Print "It is less"
        Else
            Debug.Print "not less"
        End If

我也试过了

    If Me.dueDateTxt < Me.ShippedDate Then
    If CDate(startDate) < CDate(endDate) Then        
    If Format(startDate, "mm/dd/yyyy") < Format(endDate, "mm/dd/yyyy") Then
    If DateDiff(d, startDate, endDate) > 0 Then

我在某处遗漏了一些东西。提前谢谢你的帮助

---

编辑：我知道问题出在哪里了。我有一个消除假日和周末的功能。该函数用于交换我的开始日期和结束日期。谢谢大家的帮助和建议。

您的第一段代码对我来说很好

---

您是否将文本框的格式设置为“短日期”例如？

您是否尝试过国际日期，yyyy mm dd？我还没有尝试过。从文本框中实现的日期显示为mm/dd/yyyy。在比较它们之前，我需要更改格式吗？在VBA中，使用国际日期格式总是一个好主意。你可以用格式得到这个。我知道发生了什么。我有一个消除假日和周末的功能。该函数用于交换我的开始日期和结束日期。令人沮丧的是，花了这么长时间才找到它。感谢您的回复和建议。