试问同一窗体中字段大小的比较问题

gyunfeng　发表于：2008-01-10 15:21:03 　

有一信息录入窗体包含初始日期和终止日期，为减少录入时手误，

想设定当终止日期<初始日期时，提示录入错误。

如何实现？谢谢

zoutians 发表于：2008-01-10 15:39:10

假如开始日期是：Date1 ，结束日期是：Date2

分别写Date1和Date2的失去焦点事件代码为：

Private Sub Date1_LostFocus()
    If Me.Date1 > Date2 Then
        MsgBox "开始日期大于结束日期！"
        Me.Date1.SetFocus
    End If
End Sub

Private Sub Date2_LostFocus()
    If Me.Date1 > Date2 Then
        MsgBox "开始日期大于结束日期！"
        Me.Date2.SetFocus
    End If
End Sub

总记录：1篇页次：1/1 9 1 :

Access交流中心