اجبار المستخدم الاختيار من القائمة المنسدله

[ِAbo_El_Ela]

يوجد لدي نموذج frmMaster 

يوجد به حقل اسمة [ نوع الدعوي ] وهو عبارة عن قائمة منسدله 

اريد اجبار المستخدم علي الاختيار من القائمة 

 

Database4.rarFetching info...

[اشرف]

السلام عليكم

اخي الفاضل

ارجو ان يكون طلبك في الرابط الاتي

 

[ِAbo_El_Ela]

شكرا اخي العزيز و معلمي الكريم 

لقد حاولت تنفيذ ما قرأتة و لكن لم استطع حل المشكله للاسف و لكن قمت ببعض التغييرات علي الملف و لكن ليس لها علاقة بالموضوع و هذا هو الملف الجديد و ارجو المساعده 

Database4.rarFetching info...

اسف لقد غيرت اسم النموذج الي frmDa2wa 

 

[Moosak]

الموضوع بسيط جدا أخي ...

فقط من خصائص القائمة المنسدلة > بيانات > إلتزم بالقائمة > نعم .

مرفق لك التعديل :

Database4.accdbFetching info...

تم تعديل نوفمبر 16, 2021 بواسطه Moosak

[ِAbo_El_Ela]

  في 16‏/11‏/2021 at 17:33, Moosak said:

الموضوع بسيط جدا أخي ...

فقط من خصائص القائمة المنسدلة > بيانات > إلتزم بالقائمة > نعم .

مرفق لك التعديل :

Database4.accdb 704 kB · 0 downloads

Expand  

اشكرك استاذي ادام الله فضلكم 

كفيت و وفيت

ارجو ان يتسع صدركم 

و لكن هل لها حل برمجيا بحيث اني الغي رسالة الاكسس الافتراضية و استبدلها برساله من عندي

[ِAbo_El_Ela]

حاولت حتي منعت رسالة الاكسس الافتراضية 

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

[Moosak]

  في 16‏/11‏/2021 at 22:23, ABOLO2 said:

حاولت حتي منعت رسالة الاكسس الافتراضية 

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

Expand  

يمكنك وضع رسالة تخبر المستخدم بوجوب الالتزام بالقائمة في حدث [ عند عدم الوجود في القائمة ] التابع للقائمة المنسدلة ، ولكني لم أعرف كيفية إيقاف الرسالة الافتراضية للبرنامج ..

[ِAbo_El_Ela]

  في 17‏/11‏/2021 at 13:15, Moosak said:

يمكنك وضع رسالة تخبر المستخدم بوجوب الالتزام بالقائمة في حدث [ عند عدم الوجود في القائمة ] التابع للقائمة المنسدلة ، ولكني لم أعرف كيفية إيقاف الرسالة الافتراضية للبرنامج ..

Expand  

في حدث "عند الخطأ" في النموذج وضعت هذا الكود

Private Sub Form_Error(DataErr As Integer, Response As Integer)
If DataErr = 0 Then
Response = False
End If
Response = True
End Sub

سالة الاكسس وقفت 

بس هل الكود صحيح البناء و لا لاء لا اعرف

[Moosak]

  في 18‏/11‏/2021 at 12:58, ABOLO2 said:

في حدث "عند الخطأ" في النموذج وضعت هذا الكود

Private Sub Form_Error(DataErr As Integer, Response As Integer)
If DataErr = 0 Then
Response = False
End If
Response = True
End Sub

سالة الاكسس وقفت 

بس هل الكود صحيح البناء و لا لاء لا اعرف

Expand  

جرب وأخبرنا بالنتيجة 😉

[ِAbo_El_Ela]

  في 18‏/11‏/2021 at 17:06, Moosak said:

جرب وأخبرنا بالنتيجة 😉

Expand  

و الله يا استاذنا انا جربت ووقفت الرساله بالفعل 

بس هل بناء الجمله صحيح و لا لاء لا اعرف 

اذا كان عندك حل غير هذا 

اخبرني به رجاءاً يا استاذي

[اشرف]

السلام عليكم اخواني الاعزاء

الكود يفي بالغرض ومعه الرسالة الجديدة تفضل

 

Database4.accdbFetching info...

[ِAbo_El_Ela]

  في 21‏/11‏/2021 at 19:08, اشرف said:

السلام عليكم اخواني الاعزاء

الكود يفي بالغرض ومعه الرسالة الجديدة تفضل

 

Database4.accdb 668 kB · 1 download

Expand  

تسلم استاذي الغالي 

افاد الله بك و بعلمك