abdel7medm
مدير عام المنتدى
عدد الرسائل : 53
العمر : 58
رقم العضوية : 3
تاريخ التسجيل : 10/12/2008
 | موضوع: الدرس الخامس (برنامج لعرض اعلام الدول مطور)  الإثنين مارس 30, 2009 11:54 pm | |
| تصميم برنامج لعرض أعلام الدول متطور أولا التعريف بالبرنامج :عبارة عن أداة بها قائمة منسدلة مسجل بها أسماء الدول وعند اختيار دولة والضغط على مفتاح find يظهر علم الدولة.ثانيا الأدوات المستخدمة :1- أداة combobox2- أداة button3- أدوات pictureboxثالثا تصميم واجهة البرنامجوضع على نافذة النموذج أداة combobox وأداة button وأدوات picturebox بعدد اعلام الدول المراد عرضها وتوضع جميع أدوات picturebox فوق بعضها.رابعا : تغيير خصائص الأدوات :| الأداة | combobox1 | | نكتب أسماء الدول المراد عرض اعلامها | items | | الأداة | picturebox1 | | egpyt | name | | نختار علم مصر | image | | false | visible | | الاداة | picturebox2 | | china | name | | نختار علم الصين | image | | false | visible | | الاداة | button | | find | text |
نكرر تغيير الخصائص لجميع picturebox بعدد الدول التى نعرض أعلامهاخامسا : كتابة الكود :Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim country As String
country = ComboBox1.SelectedItem
egypt.Visible = False
china.Visible = False
sudan.Visible = False.............................................................
Select Case country
Case "مصر"
egypt.Visible = True
Case "السودان"
sudan.Visible = True
Case "الصين"
china.Visible = Truecase "الهند"indea.visible=true......................................
End Select
End Sub | |
|
