当在以上截图3个日期控件里设置

有效性规则：zcrq>=[zzrq]

有效性文本：交货最早日期不能小于订单日期。

设置后输入时还存在如下漏洞（当最早日期先写上1-7，输完最晚日期1-7后，最早日期继续能修改为1-8而能保存）。 
要完全达到要求：在新增窗体保存代码前加上以下判断代码如下:

  If Me.zzrq > Me.zcrq Then
        MsgBox "交货最早日期不能大于交货最晚日期", vbCritical, "提示"
        Me.zzrq.SetFocus
        Exit Sub
   End If