درس التعامل مع الصندوق النصي Message Box في VB.Net

[eshrag.net]

بسم الله الرحمن الرحيم

يتم كتابة كود اظهار المسج بوك Message box في فيجوال بيسك دوت نت بهذا الشكل

كود PHP:
msgbox("Hi there")



أو

مارأيكم لو نبحر في عالم المسج بوكس أكثر:D

------------------------------

هناك أنواع كثيرة من المسج البوكس.
قد يكون , خطأ , استفسار , معلومة , تنبيه.

في الشكل الافتراضي , يحتوي المسج بوكس على زر واحد وهو OK , بينما هناك أنواع أخرى مثل أزرار Yes , no , cancel , Retry , Ignore

كود PHP:
MsgBox(Text[, buttons] [, title] [, helpfile, context])



Text = اجباري انك تكتب النص الذي تريد اظهاره في الصندوق.

Button = اختياري, الازرار الموجودة في الصندوق , الافتراضي هو OK

Title = عنوان الصندوق و هو اختياري

لو أردنا اضافة صندوق فيه Yes no فكل ما نفعله هو اضافة امر الزر وهو MsgboxStyle.YesNo

كود PHP:
MsgBox("Are you sure you want to exit?", MsgBoxStyle.YesNo, "Exit?")



سيظهر لك هذا الصندوق

http://img687.imageshack.us/img687/6122/68597530.jpg


لاحظ عنوان الصندوق والأزرار.

الأنواع الأخرى لن اشرحها لأنها مجرد اوامر , وهي سهلة الفهم

http://img694.imageshack.us/img694/3332/37550521.png

http://img180.imageshack.us/img180/9198/81255632.png


هناك طريقة أخرى للتعامل مع الأزرار وهي كتابة الأرقام بدلالة الازرار , تابع الجدول

http://img195.imageshack.us/img195/268/66307333.png

لتوضيح أكثر

كود PHP:
MsgBox("Are you sure you want to exit?", 4, "Exit?")



هذا الكود يشبه الكود أعلاه والذي سيظهر لنا نفس الصندوق
http://img687.imageshack.us/img687/6122/68597530.jpg

-----------------------------------------

الآن , برنامجنا غير قادر على فهم Yes or No لو ضغطت احد الخيارين فلن يحدث شيء.

سنقوم بعمل متغير هو الصندوق النصي , ثم نقوم باظهار المتغير وبعده نعطي البرنامج اوامر كل زر Yes or No

Yes = اغلاق البرنامج
No = لا تفعل شيء

كود PHP:
Dim reault = MsgBox("Are you sure you want to exit?", 4, "Exit?")
If reault = MsgBoxResult.No Then
Exit Sub
Else : End
End If




-----------------------

المرجع
http://msdn.microsoft.com/en-us/libr...8VS.60%29.aspx (http://msdn.microsoft.com/en-us/library/aa445082%28VS.60%29.aspx)