مشروع الفترة الرابعة

لتحميل الملف المضغوط محتويا على المشروع وورقة العمل وقاعدة البيانات ، اضغط على الصورة أدناه ، ثم اضغط على تحميل من أعلى شريط الأدوات:

ورقة عمل شاملة للفترة الدراسية الثالثة

الدروس المشمولة:

1. التكرار المحدد
2. صندوق النصوص الغنية
3. قائمة الصور
4. أداة التحرير و السرد
5. زر الخيار

لتحميل ورقة العمل والمشروع الخاص بها يرجى الضغط على الزر أدناه :

شرح ورقة العمل :

ورقة عمل اثرائية

الرجاء الضغط على الأيقونة لتحميل الملف المضغوط ، وفك الضغط ، يحتوي على ورقة عمل إثرائية ، والمشروع ، ومجلد الصور

3- الباب الثاني : الفصل الثاني : تابع أدوات التحكم : أدوات الخيارات

شرح درس مربع التحرير والسرد  Combo Box

شرح درس أزرار الخيار Radio Button

شرح درس صندوق التأشير Check Box

شرح درس صندوق حوار الخط Font Dialog

أمثلة على العليمات البرمجية :

التعليمة البرمجية لتظهر خريطة الدولة داخل صندوق الصورة من قائمة الصور عند اختيار احدى الدول من مربع التحرير والسرد:

PictureBox1.Image = ImageList1.Images(ComboBox1.SelectedIndex)

التعليمة البرمجية لتظهر معلومات الدولة داخل صندوق النصوص الغنية عند اختيار الدولة من مربع التحرير والسرد :

Select Case ComboBox1.SelectedIndex

            Case 0

                RichTextBox1.LoadFile("kw.rtf")

            Case 1

                RichTextBox1.LoadFile("ksa.rtf")

End Select

التعليمة البرمجية لتغيير اللون الأمامي لمحتويات صندوق النصوص الغنية إلى اللون الأزرق :

RichTextBox1.ForeColor = Color.Blue

التعليمة البرمجية لإخفاء صندوق النصوص الغنية عند التأشير على صندوق التأشير الأول ، وإظهاره عند عدم التأشير :

        If CheckBox1.Checked = True Then
            RichTextBox1.Hide()
        Else
            RichTextBox1.Show()
        End If

التعليمة البرمجية لإخفاء صندوق الصورة عند التأشير على صندوق التأشير الثاني ، وإظهارها عند عدم التأشير :

        If CheckBox2.Checked = True Then
            PictureBox1.Hide()
        Else
            PictureBox1.Show()
        End If

حل التقويم : 

2 - الباب الثاني: أدوات التحكم - الفصل الأول: صناديق البيانات

شرح الدرس : صندوق النصوص الغنية : Rich Text Box

شرح الدرس : قائمة الصور : Image List

أمثلة للتعليمات البرمجية 

تحميل ملف اسمه (kw) إلى صندوق النصوص الغنية :

 RichTextBox1.LoadFile("kw.rtf")

ربط الصورة الأولى من قائمة الصور مع صندوق الصورة :

PictureBox1.Image = ImageList1.Images(0)

حل التقويم : يمكن الضغط على الصورة لتكبيرها

1- الباب الأول : التكرار ، الفصل الأول : التكرار المحدد

يستخدم التكرار المحدد لتكرار تعليمة أو مجموعة من التعليمات عدد محدد من المرات..
سوف نتعرف من خلال الدرس على:

•  تعليمة التكرار المحدد  For ..Next  
•  تعليمة صندوق الإدخال  InputBox

شرح الدرس

ملاحظة : يمكن تكبير شاشة العرض ..

مثال للتعليمات البرمجية 

صندوق الإدخال : 

inputBox("====")

لتكرار ظهور صندوق الإدخال 3 مرات محتويا على رسالة ( أدخل الرقم السري ) :

 For i = 1 To 3

            InputBox("أدخل الرقم السري")

 Next

لتكرار ظهور صندوق الرسالة 4 مرات محتويا على رسالة ( مرحبا بكم ) : 

For i = 1 To 4

            MsgBox("مرحبا بكم")

Next

حل التقويم : يمكن الضغط على الصورة لتكبيرها