Make your own free website on Tripod.com

زر الاختيار وخانة التحقق وإطار الحاوية

 

تمهيد

·        هل لعبت مع برنامج تعليم المنطق ؟

·        هل يمكنك أن تعلم زرين في نفس الوقت ؟

·        ومتي يمكنك أن تفعل ذلك ؟

·        وما العلاقة بين ذلك وبين الإطار الحاوي لمجموعة الأزرار ؟

 

زر الاختيار :

يستخدم  زر Option Button عندما يكون لدينا خيار إما صحيح أو خطأ مثلاً الأسئلة التي تتطلب نعم أو لا ، صواب ، وخطا ، …… الخ .

في نافذة المشروع

في نافذة الأدوات

 

حاول أن تبدأ مشروع فيجوال بيسك جديد ، وانقر زر الاختيار ، وضعه علي نافذة المشروع ، وغير حجمه ، وموقعه ولاحظ مدى تأثر الخواص  Left,Top,Height,Weidth ، انقر الخاصية RightToLeft ولاحظ مدي التغير الذي يحدث علي عنوان زر الاختيار ، غير خاصية Visible من True إلي False ولاحظ ماذا يحدث ؟ ، اغلق التنفيذ ، وغير خاصية Enabled   من True  إلي False و شغل البرنامج ولا حظ ماذا ؟ هل أصبح الزر نشطاً ؟

 

أهم الخواص :

وظيفتها

اسمها

الخاصية

تختزن العنوان الذي سوف يظهر بجوار الزر.

العنوان

Caption

وهي تختزن قيمتين الأولي True وتعني أن الزر تم نقره ، وهنا تظهر بداخله نقطة سوداء ، والقيمة False وتعني أن الزر لم يتم نقره ، ولا تظهر به آي نقاط .

قيمة الخاصية

Value

يجعل اتجاه النص من اليمين لليسار  وهو مفيد للنص العربي

من اليمين لليسار

RightToLeft

يحدد البعد عن حافة نافذة المشروع اليسرى بوحدة القياس النشطة .

البعد الأيسر

Left

يحدد البعد عن حافة نافذة المشروع العليا بوحدة القياس النشطة .

البعد عن القمة

Top

يحدد ارتفاع زر الاختيار بوحدة القياس النشطة .

الارتفاع

Height

يحدد عرض زر الاختيار بوحدة القياس النشطة .

العرض

Wedith

يحدد مدي تمكن المستخدم من مشاهدة الزر في طور التشغيل من عدمه True =منظور و =Falseمخفي

منظور

Visible

يحدد مدي تمكن المستخدم من نقر الزر في طور التشغيل من عدمه True =تمكين و =Falseعدم تمكين

تمكين

Enabled

وهناك خواص أخري مثل الخاصية Font وBackColor  و هما يحدد الخط ولون الخلفية ، أما لون الخط فتحدده الخاصية ForeColor .

 

مشروع :

أبدا مشروع فيجوال بيسك  جديد ، وضع عليه الأداتين التاليتين :

خصائصها

اسمها

الأداة

التحكم في النافذة بأزر الاختيار

Caption

Form1

نافذة المشروع

&H00008000&

Backcolor

Form1

Name

True

RightToLeft

خروج

Caption

Command1

زر أوامر

CmdExit

Name

optFormgreen

Name

Option1

زر اختيار

True

RightToLeft

&H00008000& (انقر اللون)

Backcolor

1-Right justify

Alginment

أخضر

Caption

OptFormBlue

Name

Option1

زر اختيار

True

RightToLeft

&H00FF0000&

Backcolor

1-Right justify

Alginment

أخضر

Caption

وسيبدو شكل نافذة المشروع كما يلي :

وفي حدث النقر لزر الأوامر اكتب الشفرة التالية :

Private Sub CmdExit_Click()

'ينهي البرنامج

End

End Sub

 

و في حدث النقر لزر الاختيار OptFormBlue اكتب الشفرة الموجودة في جسم الإجراء :

 

Private Sub OptFormBlue_Click()

'يجعل خلفية نافذة المشروع زرقاء

If OptFormBlue.Value = True Then Form1.BackColor = vbBlue

End Sub

 

و في حدث النقر لزر الاختيار optFormgreen اكتب الشفرة الموجودة في جسم الإجراء :

 

Private Sub optFormgreen_Click()

'يجعل خلفية نافذة المشروع خضراء

If optFormgreen.Value = True Then Form1.BackColor = vbGreen

End Sub

 

 

نشاط : حاول أن تستبدل زر الأوامر بزر اختيار و باسم OptExit واكتب الشفرة التالية فيه :

IF OptExit.value=True Then End

 
صفحة البداية ما الجديد حاليا ؟ فيجوال بيسك للتطبيقات موضوعات متقدمة فيجوال بيسك لتلاميذ المدارس

أرسل استفسارك أو تعليقك  الآن

أرسل رسالتك أو استفسارك الآن

أكتب ملاحظتك أو استفسارك أو تعليقك أو ابحث عن مواقع فيجوال بيسك أخري و غيره.....

حقوق الطبع والنسخ محفوظة  © 2000 مركز الكمبيوتر التربوي
آخر تعديل: April 18, 2001