الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

قوائم منسدلة بضغطة زر

بدأه N_ELMASRY في 7 أكتوبر 2016 · 7 رد · 1,676 مشاهدة · في قواعد بيانات Microsoft Access
كومبو،زر،نموذج،فكرة
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الأخوة الأفاضل

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

بحثت عن كيفية عمل قوائم داخل نموذج فى الاكسيس كالتى نراها فى المواقع بحيث عند الضغط عليها تظهر محتويات القائمة مع عدم إظهار الشكل الاعتيادى للقوائم المنسدله ولكنى وجدت بعض الأفكار التى لم تلبى احتياجى. 

فخطرت لى فكرة وضع زر فوق القائمة وعند الضغط عليه تظهر محتويات القائمة ونجح الأمر كما بالمثال المرفق ولكن ...

بعد الضغط على الزر تظهر محتويات القائمة ويختفى الزر خلف القائمه.

والمطلوب: أن يظل الزر فوق القائمه دائمًا بحيث لايظهر شكل القائمة المنسدله دومًا ..... فهل أجد فكرة تساعد فى انجاز هذا الامر ...

ولكم جزيل الشكر والتقدير

وهذا شرح لكيفة تنفيذ الفكره...

https://msdn.microsoft.com/en-us/library/office/ff836880.aspx

Test.rar

تم تعديل هذه المشاركة بواسطة N_ELMASRY في 7 أكتوبر 2016 في 10:48

#2

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

في نظري استخدام عنصر التحكم Web Brwoser Control وتصميم صفحة HTML أفضل من محاكاة ذلك على نموذج أكسس.

#3

الحل باستخدام list box

البرنامج بعد التعديل..

 

Test.rar

#4
Gaham كتب:

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

في نظري استخدام عنصر التحكم Web Brwoser Control وتصميم صفحة HTML أفضل من محاكاة ذلك على نموذج أكسس.

جزاك الله خيرًا على الاستجابة، ولوممكن إيضاح لفكرة حضرتك .....

 

raz8081 كتب:

الحل باستخدام list box

البرنامج بعد التعديل..

 

Test.rar

جزاك الله خيرًا وجارى التجربة ....

#5
N_ELMASRY كتب:

جزاك الله خيرًا على الاستجابة، ولوممكن إيضاح لفكرة حضرتك .....

 

جزاك الله خيرًا وجارى التجربة ....

اهلا وسهلا .. الفكرة ببساطة وضعت list box تحت الـــ button . وبعدها جعلت خاصية رؤية الــــ list غير مفعلة لاخفائها في البداية وعند الضغط على الـــــ button يتم تفعيل رؤية الليست .

Me.List20.Visible = True

#6
raz8081 كتب:

اهلا وسهلا .. الفكرة ببساطة وضعت list box تحت الـــ button . وبعدها جعلت خاصية رؤية الــــ list غير مفعلة لاخفائها في البداية وعند الضغط على الـــــ button يتم تفعيل رؤية الليست .

Me.List20.Visible = True

آسف، السؤال بخصوص التوضيح كان للأخ Gaham

فكرتك جميله ولكنى حاولت إخفاء القائمة عند عدم التركيز ولكنى لم استطع الوصل لما اريد ولكنها ساعدتنى بعد تجربتها للوصول لفكرة أخرى وهى:

أن جعلت قيمة ارتفاع القائمة المنسدلة يساوى صف ووضعتها عند الحد السفلى للزر بحيث لاتظهر فى النموذج نهائيًا، كما بالمثال المرفق

وأكرر شكرى وتقديرى لك أخى الكريم على الاهتمام

 

TestFinal.rar

تم تعديل هذه المشاركة بواسطة N_ELMASRY في 8 أكتوبر 2016 في 21:58

#7
N_ELMASRY كتب:

آسف، السؤال بخصوص التوضيح كان للأخ Gaham

فكرتك جميله ولكنى حاولت إخفاء القائمة عند عدم التركيز ولكنى لم استطع الوصل لما اريد ولكنها ساعدتنى بعد تجربتها للوصول لفكرة أخرى وهى:

أن جعلت قيمة ارتفاع القائمة المنسدلة يساوى صف ووضعتها عند الحد السفلى للزر بحيث لاتظهر فى النموذج نهائيًا، كما بالمثال المرفق

وأكرر شكرى وتقديرى لك أخى الكريم على الاهتمام

 

TestFinal.rar

اهلا وسهلا بك عزيزي ...

فعلا فكرتك جميلة جدا ...

1
#8

وده إضافة لأحد الأخوة فى منتدى 

حيث عند الضغط على الزر تظهر القائمة وعند الضغط عليه مرة أخرى يقوم بإخفائها

وأيضًا إضافة أخرى من أخ تقدم بفكرة جميله حيث يقوم الزر بأخذ اسم العنصر الذى تم اختياره من القائمة 

كالتالى:  

Private Sub cmb_Committe_AfterUpdate()
btn_DropCommittee.Caption = cmb_Committe
End Sub

وأكرر شكرى وتقديرى للأخوة الأفاضل الذين اهتموا وقدموا المساعدة والأفكار المبدعة 

Test2.rar

مواضيع مشابهة