تعلم معنا:البرمجة بلغة فيجوال بيسك  الحلقة (12)

الرياض@نت: خالد بن محمد المسيهيج

نستكمل بدرسنا هذا دروس استخدام الدوال الشرطية ودورها في اتخاذ القرارات، حيث سنتناول دالة اختيار الحالات Select Case والتي تقوم بنفس الدور في معظم الأحيان، وسيتجلى لنا ذلك بعد أن نقوم بشرح المثال الذي لا يختلف كثيراً عن مثالنا في الدرس الحادي عشر .

*مثال :

نفترض أنك تريد أن تنشئ برنامجاً يساعدك في إيجاد التقديرات المقابلة للدرجات التي يحصل عليها الطلاب، بحيث تضمن عدم حدوث أي أخطاء، وعندك الدرجات المعيارية التي ستقيس عليها، فالرسوب للحاصلين على أقل من خمسين درجة، بينما من نالوا درجات أكبر من خمسين وأقل من سبعين فتقديرهم مقبول، والذين رصدت لهم درجات أكبر من سبعين وأقل من ثمانين فسيكون تقديرهم جيداً، وجيداً جداً لمن وقعت درجاتهم ما بين التسعين والثمانين، ومن تسعين فما فوق فتقديرهم ممتاز .

* التطبيق :

نقوم بإنشاء نافذة فيجوال بيسك جديدة ونضع فيها مربع نص Text1 نكتب به الدرجات وملصق Label1 تظهر به نتائج التقديرات، ونضع ملصقاً معرفاً أمام مربع النص ونسميه Label3 ونضع بداخله معرف (الدرجة) ليفهم من يتعامل مع البرنامج آلية عمله، ونستدعي ملصقاً آخر Label2 ونضعه أمام Label1 ونصفه بمسمى (التقدير) ثم نضع زر Command1 ونميزه بمسمى (حساب) ونقوم بالنقر المزدوج عليه ليفتح لنا خانة نكتب بها الكود كما يظهر من الصورة رقم (1) .
الآن ننفذ ماذا نلاحظ؟ نجد أنه يعمل بكفاءة ودون أي أخطاء كما يبدو من الشكل رقم (2).
يمكن الحصول على الملفات المصدرية للبرنامج من خلال الوصلة التالية:
www.ma3refah.org/km/12.zip