ป้องกันไม่ให้แก้ไขข้อมูล

[Xternity]

สวัสดีครับ
ในฟอร์ม อยากจะสร้างเงื่อนไข ถ้าวันที่ในฟิลด์ วันที่จ่าย น้อยกว่าวันที่ปัจจุบัน
อยากจะให้ ไม่สามารถแก้ไขได้ สามารถทำได้ไหมครับ ขอคำแนะนำด้วยครับ

[OddyWriter]

สำหรับฟอร์ม
1. TextBox ที่เก็บวันที่ชื่อ txtDataDate
2. ที่ On Current ของฟอร์มให้ใส่ Code นี้ครับ

Private Sub Form_Current()
    If txtDataDate < Date Then
        Me.AllowEdits = False
    Else
        Me.AllowEdits = True
    End If
End Sub