اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

التحكم في ادخال بيانات الحقل بثلاث طرق


الردود الموصى بها

السلام عليكم

لدى مربع نص فى نموذج إدخال اسمه

الرقم القومى

استخدمت الكود التالى للتحقق من كون الأرقام المدخلة فيه = 14 رقما

Private Sub الرقم_القومى_BeforeUpdate(Cancel As Integer)

If Not Len(Trim(الرقم_القومى)) = 14 Then

MsgBox "أدخل الرقم القومى بصورة صحيحة"

Cancel = True

Exit Sub

End If

End Sub

و هل سبب عدم تنفيذ الكود أن اسم مربع النص عربى؟

و جزاكم الله خيرا

رابط هذا التعليق
شارك

استاذنا الكبير كيماس نشكرك على الابداع المتواصل

في مايخص الكتابة بالعربي في الكود غالبا ماكانت تواجهني صعوبات واخفاقات بسبب اللغة

لذلك في رأيي نتجنب قدر الامكان الكتابة بالعربي في الاكواد

رابط هذا التعليق
شارك

أصل هذه بيانات مصدرة من إكسل

و أسماء الحقول كلها كانت عربية

ما الحل

هل أعيد تسمية الحقول

و أيضا أعيد بناء نموذج الإدخال؟

رابط هذا التعليق
شارك

أصل هذه بيانات مصدرة من إكسل

و أسماء الحقول كلها كانت عربية

ما الحل

هل أعيد تسمية الحقول

و أيضا أعيد بناء نموذج الإدخال؟

جرب هذا الكود

Private Sub الرقم_القومي_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)

If Not Len(Trim(الرقم_القومى)) = 14 Then

MsgBox "أدخل الرقم القومى بصورة صحيحة"

Cancel = True

Exit Sub

End If

End Sub

تم تعديل بواسطه ولد المجرب
رابط هذا التعليق
شارك

الاستاذ الفاضل منتصر الانسي

جزاك الله خير الجزاء وزادك من العلم وبارك فيك

وحفظ الله اليمن السعيد واعاد اليه سعادته

ابواحمد

رابط هذا التعليق
شارك

مشكور اخي ابواحمد وسمع الله منك

اخي kemas هما نفس الشيئ وليس بينهما اي فارق ويمكنك تجربة ذلك في الكود

ولكن عادة ما يتم اعطاء القيمة True الرقم -1 و False الرقم 0

تحياتي,,,

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information