فديو:شرح التحقق من عدد أرقام الرقم القومى

[عبد الفتاح كيرة]

السلام عليكم

هذا فديو قصير يوضح طريقة التحقق من إدخال المستخدم

للرقم القومى

بواسطة الكود و دالة len

 

[رمهان]

ممكن نشارككم استاذ عبدالفتاح وبكود مختصر

من وجهة نظري قبل التحديث افضل وعدم تصفير العنصر لكي لا يتم الادخال من جديد 

Private Sub CHqawmy_BeforeUpdate(Cancel As Integer)
If Len(CHqawmy) <> 14 Then Cancel = MsgBox("الرقم غير صحيح")
End Sub

 

[صالح حمادي]

جزاكم الله كل خير على أعمالكم

[عبد الفتاح كيرة]

شكرا لكم

أخ رمهان بارك الله فيك

نعم لعلك على حق

و الطرق كثيرة كما تعلم

كما يمكن عمل ذلك من خصائص الحقل كما تعلم

و الحقيقة أن هذا الفديو كان أكبر من ذلك

فكان التحقق مجرد خطوة قبل استخراج اليوم و الشهر و السنة و تجميع تاريخ الميلاد من الرقم القومى

لكن حدث خلل أدى لاقتصاص الفديو و اقتصاره على ما رأيت

و إن شاء الله أصلح الأدوات قريبا 

أشكر الأخ حمادى على ثنائي الطيب

[صالح حمادي]

العفو أستاذنا أنت أهل لها