Free Web Hosting by Netfirms
Web Hosting by Netfirms | Free Domain Names by Netfirms

التعليمات الشرطية في فيجوال بيسك

هذا نوع خاص من التعليمات تستخدم لحالات معينة ومحددة وتسمى ايضاً بتعليمات التحكم لانها تتحكم في سير تنفيذ خطوات البرنامج كما انها  تسمى بتعليمات التفرع لانها تخلق او تنشيء مجموعة من التفرعات داخل البرنامج الواحد وسميت بالتعليمات الشرطية لانها تنشيء تفرعات  بناء على شرط معين . ولها عدة صيغ :

1 – IF – THEN  :

امر واحد فقط THENشرطSYNTAX : IF

معنى هذه الصيغة انه اذا تحقق الشرط فقم بتنفيذ الامر ، ومعنى تحقق الشرط ان تكون قيمته صحيحة TRUE مثلا

" انت كبير في السن"IFAge >60 THEN Text4.Text=

والمعنى انه اذا كان العمر المدخل اكبر من 60 فان البرنامج يقوم بطباعة عبارة ( انت كبير في السن ) في اداة النص المسماة Text4 .

2 – صيغة  IF -  THEN – END IF

SYNTAX:

 THEN   شرطIF 

امر1

امر 2

END IF

وهذه الصيغة تقوم  بتنفيذ محموعة من الاوامر بدل واحد وذلك اذا تحقق الشرط مثلا :

IFAge>60THEN

"انت كبير في السن "Text2.text=

"هل ترغب في  التقاعد"Text3.text=

End if

والمعنى اذا كان العمر المدخل اكبر من 60 فان البرنامج سوف يقوم يتنفيذ امرين هما :

طباعة عبارة انت كبير في السن داخل اداة النص المسماة Text2

طباعة عبارة هل ترغب في التقاعد داخل اداة النص المسماة Text3

3 – صيغة IF – THEN – ELSE

SYNTAX:

THEN  شرطIF 

امر1

ELSE

امر 2

END IF

 هذه الصيغة تنفذ امر1 عندما يتحقق الشرط ام عندما لا يتحقق الشرط فانها تنفذ امر2 . مثلا

IF Age>60THEN

"انت كبير في السن"Text2.text=

Else

"لازلت في مقتبل العمر "Text2.text=

End if

ومعنى هذا المثال انه اذا كان العمر المدخل اكبر من 60 تحقق الشرط فان البرنامج يقوم بطباعة عبارة انت كبير في السن داخل اداة النص المسماة Text2 ، اما ان كان العمر اقل من او يساوي 60 لم يتحقق الشرط فسوف يقوم البرنامج بطباعة عبارة لازلت في مقتبل العمر داخل اداة النص المسماة Text2 .

4 – صيغة IF – THEN – ELSEIF:

SYNTAX:

   THENشرط1IF  

امر1

THEN  شرط2ELSEIF  

امر2

........................

ELSE

الامر الذي ينفذ اذا لم يتحقق أي شرط من الشروط السابقة

......................

ENDIF

وهذه الصيغة قريبة من الصيغة الثالثة الانها تضع شرطا جديدا عندما لا يتحقق الشرط السابق . مثلا

IF Age>60then

""انت كبير في السن"Text2.text=

ELSEIF Age>30THEN

"لازلت في مقتبل العمر "Text2.text=

ELSEIF Age>15THEN

"لازلت شابا"Text2.text=

ELSE

"انت صغير جدا "Text2.text=

ENDIF

ومعنى هذا المثال انه اذا كان العمر المدخل اكبر من 60 تحقق الشرط فسوف يقوم البرنامج بطباعة عبارة انت كبير في السن داخل اداة النص المسماة Text2  ، اما اذا كان العمر اكبر من 30 او اقل من او يساوي 60 لم يتحقق الشرط فسوف يقوم البرنامج بطباعة عبارة لازلت في مقتبل العمر  داخل اداة النص Text2 ، واما اذا كان العمر اكبر من 15 و اقل من او يساوي 30 فسوف يقوم البرنامج بطباعة عبارة لا زلت شابا داخل اداة النص Text2 اما ان كان العمر غير ذلك فسوف يقوم البرنامج بطباعة عبارة انت صغيرجدا .

 

مقدمة

البرمجة الشيئية

بيئة فيجوال بيسك
مربع الادوات
كيف يعمل البرنامج
التدريب  1

انواع البيانات

تعليمات الادخال والاخراج
التعليمات الشرطية
باقي التدريب 1
الحلقات التكرارية
المصفوفات
التدريب2
ادارة قواعد البيانات
تدريب عام

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

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

 

 

 

 

 

 

 

 

     
  A-motaz@hotmail.com