[ تمت الإجابة ]البطاقة المدنية 12 خانة رقمية

تفضل اخي الكريم...

بالنسبة للنموذج ...

1- لترتيب انتقال المؤشر افتح النموذج على وضع التصميم وفي اي مكان فارغ اضغط على الزر الايمن للماوس ستظهر قائمة جانبية اختر منها الامر المسمى Tab Order ستفتح لك قائمة باسماء الكائنات داخل النموذج رتبها كما تريد عن طريق الاختيار ثم السحب والافلات Drag And Drop

2- لالزام المستخدم بكتابة رقم واحد فقط في كل مربع نص انتقل الى خواص المربع ثم خاصية قاعدة التحقق من الصحة او Validation Rule ثم اكتب العبارة التالية

Len([text box name]=1)

طبعا مكان text box name ستكتب اسم مربع النص 1- 2 - 3......حتى 12

ثم انتقل الى خاصية نص التحقق من الصحة او Validation Text واكتب اي عبارة ترشد المستخدم الى الخطأ الذي وقع فيه حال مخالفته قاعدة التحقق من الصحة.

وبالنسبة للتقرير ستجد الامر واضحا بالمرفق وقد حذفنا من الجدول الحقل المسمى ID لا ضرورة له لاننا نقوم بتصنيعه داخل التقرير كما سترى...

وهذا هو المرفق ...

هنا

أخي الغالي

السلام عليكم ورحمة الله وبركاتة

يمكنك عمل هذا من خلال هذا الكود عند الخروج من كل حقل

Private Sub T1_Exit(Cancel As Integer)
If IsNull(T1) Then
Dim x As String
x = MsgBox("لا يمكن ترك الحقل فارغ", vbCritical, "رسالة تحذيرية")
Cancel = -1
End If
End Sub

هذا بالاضافة الي لو انت ضغط كليك يمين علي النموذج في نمط التصميم سيظهر لك خيار Tab Order وهو خيار يمكنك من خلال التحكم في ترتيب التنقل بين الحقول الموجوده داخل نموذجك

اليك مرفقك بعد اجراء التعديلات اللازمة علية

id.rar

لكم مني كل الشكر :) وجزاكم الله كل خير على سرعة الرد والافادة

بسم الله الرحمن الرحيم

تمت الإجابة على الموضوع

إدارة الفريق العربي للبرمجة