عندما يكون الرقم القومي اقل من او اكثر من 14 رقم يخرج رسالة تنبيه للمستخدم بوجود خطأ في الرقم القومي وهذا هو الكود الذي استخدمته والكود ناجح تماما ولكن عند الضغط علي زر سجل جديد يعمل الزر وينتقل الي سجل جديد حتي بدون اصلاح الرقم القومي انا اريده لا ينتقل الي سجل جديد أو حتي السجل السابق الا بعد اصلاح الرقم القومي وهذا هو الكود الذي استخدمته
If Len(Trim(Me.dd)) <> 14 Then
MsgBox " من فطلك اعد كتابة الرقم القومي مرة اخري ", vbOKOnly + vbCritical + vbMsgBoxRight, " "
Me.Undo
DoCmd.GoToControl ("dd")
End If
