شرح خواص صندوق Msgbox فى التصميم

admin

عضو إداري
ادارة المنتدى

خواص صندوق Msgbox فى التصميم
======================


اولا _ Msgbox اختصار الى Message Box و تعني صندوق رسالة وهذا الصندوق عبارة عن كود برمجي بلغة ال (بيسك ) لاظهار رسالة ما كالــ كثير من الرسائل التي تراها في نظام النوافذ ( ويندوز ) كأن يكون هناك رسالة خطأ او تحذير او تنبيه او استفهام .... الخ

وللاسف الكثير من الذين يعلمون لغة البيسك يبدأون بتعليم المبتدئين نمط الرسائل على انه رسالة فحسب تحمل اسم البرنامج مثل :
(" Msgbox ("Hello All
و هذا التعليم يقولون انه تعليم للمبتدئين ولا داعي الى تعليمهم امور تعقدهم


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

اذا كتبت في نافذة الاكواد رسالة نصيه فسيكون فيها العديد من الخيارات وسيتم الشرح :
طبعا نحن نكتب الكلمة المتعلقة بكود الرسالة Msgbox
ثم نضع " لبدء كتابة النص الذي نريد
وبعد الانتهاء من كتابة نص الرسالة نضع " اخرى لاعلام الحاسب باني انتهيت من كتابة نص الرسالة
والان الجزء الاهم وهو الخيارات الاضافية للرسالة بعد ان كتبنا Msgbox ثم " ثم النص الذي نريد ثم " نكتب , ثم تظهر لك قائمة طويلة بالخيارات وهي باترتيب :


  • vbAbortRetryIgnore اي تضع لك بالرسالة ثلاث ازرار هم احباط واعادة محاولة و الغاء الامر
  • vbApplicationModal اي تضع لك الرسالة على نمط البرنامج ( اي ليس لها علاقة بالويندوز)
  • vbCritical وهي لوضع ايقونة خطأ اي × في رسالتك
  • vbDefaultButton1 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الاول
  • vbDefaultButton2 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الثاني ( لكن بالطبع يجب ان يكون عندك رسالة فيها اكثر من زرين)
  • vbDefaultButton3 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الثالث ( لكن بالطبع يجب ان يكون عندك بالرسالة فيها اكثر من 3 ازرار)
  • vbDefaultButton4 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الرابع ( لكن بالطبع يجب ان يكون عندك بالرسالة فيها اربع ازرار حصراً )
  • vbExclamation وهي لوضع ايقونة تحذير التي تأتي بمثلث اصفر وفيها ! في رسالتك
  • vbInformation وهي لوضع ايقونة معلومات الي تأتي بدائرة زرقاء وفيها ! في رسالتك
  • vbMsgBoxHelpButton اي لتضع لك بالرسالة زر المساعدة "Help" وانت تحدد الكود الذي يظهر عند الضغط عليه ....الخ
  • vbMsgBoxRight يجعل نص الرسالة من اليمين الى اليسار
  • vbMsgBoxRtlReading تجعل الازرار و زر × على اليسار
  • vbMsgBoxSetForeground وهي لجعل صندوق ال رسالة في المقدمة
  • vbOKCancel تجعل في رسالتك زرين هما موافق و الغاء الامر
  • vbOKOnly تجعل في رسالتك زر واحد فقط وهو موافق
  • vbQuestion وهي لوضع ايقونة استفهام التي تاتي في دائرة زرقاء وفيها ؟ في رسالتك
  • vbRetryCancel تجعل في رسالتك زرين هما اعادة المحاولة و الغاء الامر
  • vbSystemModal تجعل الرسالة على مستوى النظام
  • vbYesNo تجعل في رسالتك زرين هما نعم ولا
  • vbYesNoCancel تجعل في رسالتك ثلاث ازرار هم نعم ولا و اعادة محاولة


والان بعد ان شرحنا اضافات الرسالة نتعلم كيف نصنعها :

طبعاً نضع كود Msgbox \ " \ النص الذي نريد\ " \ , \ نضع خياراً ما من الخيارات السابقة \ , \ " \ نضع عنوان الرسالة \ "

"Msgbox "hello" , vbYesNo , " Welcome Box

وسؤال يطرح نفسه كيف اذا اردت ان اضع اكثر من خيار في رسالة واحدة مثل ان يضع زر نعم ولا و ايقونة استفهام
اجاوبك :
هذا صحيح نضع بعد كل خيار + ثم الخيار الثاني مثل :

"Msgbox "Hello All" , VbYesNo + Vb vbQuestion , "Welcome Box

وهكذا يتم تركيب اي رسالة تريدها طيب اذا اردت ان اضع نص + نص او عنوان + عنوان .... صحيح ترجم العربية للبيسك فتصبح

" Msgbox "Hello" + "Alaa" ,,"Welcome
"Msgbox "hello Alaa " ,,"Welcamo" + "box


ملاحظة نضع هذه العلامة ,, اذا كنا لا نريد خيارات
ملاحظة اخرى عند تركيب الكود لايجب ان يكون هناك تضاد كأن تضع له اضافة زر نعم ولا و اضافة احباط والغاء الامر لانه تلقائيا سوف يبطل الخياران
ملاحظة اخرى اذا اردت ان يرسل لك رسالة حسب مربع نص ليكن T1 نكتب له
(Msgbox (T1



وهكذا نكون قد تعلمنا صنع رسالة نصيه حسب الطلب

 

أعلى