النافذة العربية للبرمجة

النافذة العربية للبرمجة
 
الرئيسيةالمشاركاتمكتبة الصورس .و .جبحـثالأعضاءالمجموعاتالتسجيلدخول

شاطر | 
 

 القوائم المنسدلة و بعض المهارات

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

عدد الرسائل : 483
العمر : 32
الموقع : اليمن الحبيبة
العمل/الترفيه : طالب برمجة
تاريخ التسجيل : 13/06/2008

بطاقة الشخصية
المدير العام / عبدالهادي الحداد:

مُساهمةموضوع: القوائم المنسدلة و بعض المهارات   الأربعاء سبتمبر 17, 2008 12:54 pm

سنتعلم انشاء قوائم منسدلة

و عند اختيار شئ من تلك القائمة ستظهر لنا بعض التفاصيل عن تلك الكلمة .


ما رأيك اخي ان نعمل بريمج صغير يحتوي على قوائم منسدلة و تلك القائمة المنسدلة تحتوي على اسماء الدول و عند اختيار دولة من القائمة سيظهر لنا في صندوق اسم الدولة و مكان تواجدها .

بسم الله نبدا .

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


[/s




اعمل مربع عنوان اخر Label2 بجانب القائمة المنسدلة و اعطه عنوان ( اختر دولة ) .
اعمل مربع عنوان ثالث Label3 و اتركه فارغا ( لتركه فارغ لا تكتب شيئ عليه ) .
اعمل مربع عنوان رابع Label4 و اتركه فارغ ايضا و غير خاصية الحدود التي هي Border style الى الاعداد


الكود:
 

[size=12]1-fixed Singele .[/size]

الان اعمل رز Command 1 غير خاصية CAPTION الى ( إنهاء ) .

عندها ينتج لنا الشكل التالي :
[img]http://awfm.boardlog.com/




[size=12]الان دور الكود .
سوف نكتب الشفرة الخاصة بالقائمة المنسدلة
انقر النموذج نقرا مزدوجا يظهر الاجراء الحدثي Form_Load تظهر لك نافذة الشفرة و الجملتين البرمجيتين التاليتين :
الكود:
[/b]
[b][size=12]Private Sub Form_Load[/size]

[size=12]End Sub
[/size]
[/center]
[/b]
[center][b]

[size=12]اكتب الشفرة التالية بين الجملتين السابقتين :
الكود:
List1.AddItem "السعودية "
List1.AddItem " مصر "
List1.AddItem " الجزائر "
List1.AddItem " ليبيا"
List1.AddItem "المغرب "


لينتج لنا الشكل الإجمالي التالي للكود :
الكود:
Private Sub Form_Load()
List1.AddItem "السعودية "
List1.AddItem " مصر "
List1.AddItem " الجزائر "
List1.AddItem " ليبيا"
List1.AddItem "المغرب "
End Sub


تستعمل الشفرة السابقة لاضافة البنود داخل القائمة المنسدلة و التي طبعا و حتما ستظهر عند تشغيل البرنامج .
[img]http://awfm.boardlog.com/



الان اخي الكريم انقر فوق قائمة السرد نقرتين يظهر لك الاجراء الحدثي التالي List1_Click داخل الجملتين البرمجيتين التاليتين :


الكود:
[/b][/center]
[size=12][center]
[b]Private Sub List1_Click()
[/b][/size]
[b][size=12]End Sub
[/size]


اكتب بينهما الجمل البرمجية التالية :
الكود:
[/b]
[b][size=12]Label3.Caption = List1.Text
Select Case List1.ListIndex
Case 0
Label4.Caption = " السعودية بلد في الجزيرة العربية في قارة اسيا "
Case 1
Label4.Caption = " مصر بلد افريقي "
Case 2
Label4.Caption = " تقع الجزائر في شمال القارة السمراء ( القارة الأفريقية ) "
Case 3
Label4.Caption = " تقع ليبيا في افريقيا "
Case 4
Label4.Caption = " تقع المغرب في غرب القارة الافريقية "

End Selec[/size]

[size=12]لينتج لنا هذا الشكل الإجمالي للكود :
الكود:
Private Sub List1_Click()
Label3.Caption = List1.Text
Select Case List1.ListIndex
Case 0
Label4.Caption = " السعودية بلد في الجزيرة العربية في قارة اسيا "
Case 1
Label4.Caption = " مصر بلد افريقي "
Case 2
Label4.Caption = " تقع الجزائر في شمال القارة السمراء ( القارة الأفريقية ) "
Case 3
Label4.Caption = " تقع ليبا في افريقيا "
Case 4
Label4.Caption = " تقع المغرب في غرب القارة الافريقية "

End Select

End Sub

شرح الكود :
السطر الأول من الكود يعطي الامر لكتابة اسم الدولة المختارة في صندوق العنوان Label3 .
اما الاسطر الباقية فهي التي تتحكم في الجمل التي ستظهر عند اختيار البند من القائمة المنسدلة .
السطر ما قبل الاخير هو لاعلام البرنامج بانتهاء جمل القائمة .

الان هيا لاخر خطوة في البرنامج هو زر الانهاء لانهاء البرنامج طبعا كنا قد تعلمنا هذا في دروس سابقة لكن دعنا نعيد ذلك باختصار شديد انقر نقرتين فوق زر الانهاء اكتب بين الجملتين البرمجييتن الالتي ستظهران الامر التالي :
ٌُُُُEnd
و اخير عزيزنا الغالي من المؤكد انك حصلت على برنامج كهذا .

[img]http://awfm.boardlog.com/




لا تنسونا من صالح أعمالكم ،،،،،،
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://awfm.boardlog.com
الوسام اليماني



عدد الرسائل : 16
تاريخ التسجيل : 09/07/2008

بطاقة الشخصية
المدير العام / عبدالهادي الحداد:

مُساهمةموضوع: رد: القوائم المنسدلة و بعض المهارات   السبت سبتمبر 20, 2008 8:15 am

thank youuuuuuuuuuu
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
 
القوائم المنسدلة و بعض المهارات
استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
النافذة العربية للبرمجة :: قسم لغات برمجة التطبيقات :: منتدى Microsoft Visual Basic-
انتقل الى: