رد: البرمجة بلغة الفيجول بيسك لصف ثالث ثانوي
4- الجملة الشرطية (Select Case):
إذا كان لديك احتمال واحد أو احتمالين للشرط، فإنه يمكنك استخدام قاعدة (IF) التي ذكرناها سابقاً ، أما إذا كان لديك عدة احتمالات يفضل استخدام قاعدة (Select Case) ، وتكون صيغته كالتالي:
SELECT CASE expression
CASE prob1
…..
statements1
…..
CASE prob2
…..
statements2
…..
CASE ELSE
…..
statements3
…..
END SELECT
حيث إن :
1- SELECT CASE : بداية صيغة القاعدة.
2- expression : التعبير الذي نريد تقييمه.
3- CASE : توضع قبل كل احتمال من احتمالات التعبير الذي نريد تقييمه.
4- prob1, prob2, … : الاحتمالات التي نريد تقييمها للتعبير.
5- CASE ELSE : نستخدمها إذا أردنا تنفيذ أوامر عندما لا يتحقق أي احتمال من الاحتمالات السابقة،وهي اختيارية بمعنى أننا إذا لم نستخدمها فإن ذلك لا يؤثر.
6- END SELECT : نهاية القاعدة.
في هذه القاعدة يقوم "فيجول بيسك" بتقييم التعبير (expression) في بداية القاعدة ، ثم يبدأ في مقارنته مع الاحتمالات المختلفة (prob1, prob2,...) التي تذكرها عند كلمة CASE ، فإذا وافق أحدها الشرط ، فإنه يقوم بتنفيذ مجموعة الأوامر التي تليها حتى كلمة CASE التالية، وإذا لم يوافق أيّاً من الاحتمالات المذكورة فإنه ينفذ مجموعة الأوامر التي تلي كلمة (Case Elese) ، وهي اختيارية بمعنى أنها إذا لم تكن موجودة فإنه لا ينفذ أيّاً من تلك الأوامر. والمثال التالي يوضح استخدام ((Select Case :
SELECT CASE grade
CASE 90 to 100
Text1 = " ممتاز"
CASE 80 to 89
Text1 = "جيد جدا"
CASE 70 to 79
Text1 = "جيد"
CASE 60 to 69
Text1 = "مقبول"
CASE Else
Text1 = "راسب"
END SELECT
وقد استخدمنا نفس المثال في جملة (IF - THEN - ELSEIF) ، وهنا نرى قيمة الدرجة ( D ) ، وحسب هذه القيمة نخزن قيمة التقدير في المتغير الحرفي ( Text1 ).
|