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

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

من المعلوم أنه كلما كان البرنامج مرناً ويمنح المستخدم حرية أكبر كلما كان ذلك دليل قدرة المبرمج ومهارته، ولكن هذا يتطلب أن يكون هناك لغة حوار وسيطة ما بين المبرمج والمستخدم. كيف؟ بالتأكيد أنه أثناء تجاربك وعملك على الكثير من البرامج صادفت صناديق رسائل تعرض لك خيارات وبناءً على اختيارك يتحدد مسار عمل البرنامج، كحفظ الملفات أو حذفها أو الكتابة فوق ملف موجود أو رسالة لتأكيد الخروج .. وهكذا وتريد أن تصنع شيئاً كهذا، المسألة ليست صعبة وسنخصص درسين لموضوع الرسائل هذا الدرس نتناول من خلاله الرسائل البسيطة بينما نتعرف في الدرس المقبل على استخدام الرسائل في اتخاذ القرارات. لصناعة الرسائل نستخدم الدالة MsgBox حيث تأخذ الرسالة البسيطة الشكل التالي:
Title , ## , Prompt MsgBox
فيعبر Prompt عن نص الرسالة، و ## عن الرموز والأزرار، بينما Title يقصد به عنوان النافذة.
والرموز والأزرار يوضحها الجدول رقم (1) فيظهر لنا أن كل زر أو مجموعة أو رمز حجزت له قيمة ثابتة بحيث يتم استخدام هذه القيم منفردة أو يتم مزجها بعملية الجمع .
مثال: في أحد دروسنا الماضية تعرضنا لبرنامج يقوم بحساب الزكاة، واشترطنا فيه بلوغ النصاب، وكان في ذلك الدرس عند عدم بلوغ النصاب يقوم البرنامج بالخروج، سنستخدم نفس بيانات ذلك المثال وسنضع رسالة تظهر للمستخدم إذا كان المبلغ لم يبلغ النصاب .
التطبيق نفس بيانات المثال السابق يضاف إليه الرسالة، حيث نقوم بكتابة الكود كالموضح بالشكل  2وفيه نركب الرسالة بالشكل التالي:
نحن نحتاج إلى مكان لنص الرسالة ، وعلامة استعلام ، وزر موافق كيف سنحصل على ذلك؟ نقوم بإجراء عملية الدمج ما بين قيم الرمز والأزرار ، فالاستعلام عندنا يرمز له بالرقم  64بينما زر موافق يرمز له بالصفر فنجمعهما:
+ 64صفر =
64والآن نضع دالة الرسائل ثم نضع نص الرسالة بين علامتي تنصيص تليها فاصلة ثم الرقم  64وبعده فاصلة ثم نضع عنوان نافذة الرسالة بين علامتي تنصيص .
نفذ الآن وضع أي مبلغ يقل عن  56ريالاً ستظهر لك رسالة كالموضحة في الشكل  3تفيدك بعدم بلوغ النصاب .
يمكن الحصول على الملفات المصدرية للمثال السابق من خلال الوصلة التالية:
www.ma3refah.org/km/13.zip