28-07-18, 02:46 AM
(آخر تعديل لهذه المشاركة : 28-07-18, 02:51 AM {2} بواسطة Morqos Emad Ghobrial Vb.)
كود عمل رسالة بالفيجوال بيسك
msgbox ("الرسالة",نوع الرسالة,"عنوان الرسالة")
حط مكان نوع الرسالة اي نوع من االلي جايين دول
انواع الرسائل
vbAbortRetryIgnore اي تضع لك بالرسالة ثلاث ازرار هم احباط واعادة محاولة و الغاء الامر
vbApplicationModal اي تضع لك الرسالة على نمط البرنامج ( اي ليس لها علاقة بالويندوز)
vbCritical وهي لوضع ايقونة خطأ اي × في رسالتك
vbDefaultButton1 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الاول
vbDefaultButton2 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الثاني ( لكن بالطبع يجب ان يكون عندك رسالة فيها اكثر من زرين)
vbDefaultButton3 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الثالث ( لكن بالطبع يجب ان يكون عندك بالرسالة فيها اكثر من 3 ازرار)
vbDefaultButton4 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الرابع ( لكن بالطبع يجب ان يكون عندك بالرسالة فيها اربع ازرار حصراً )
vbExclamation وهي لوضع ايقونة تحذير التي تأتي بمثلث اصفر وفيها ! في رسالتك
vbInformation وهي لوضع ايقونة معلومات الي تأتي بدائرة زرقاء وفيها ! في رسالتك
vbMsgBoxHelpButton اي لتضع لك بالرسالة زر المساعدة "Help" وانت تحدد الكود الذي يظهر عند الضغط عليه ....الخ
vbMsgBoxRight يجعل نص الرسالة من اليمين الى اليسار
vbMsgBoxRtlReading تجعل الازرار و زر × على اليسار
vbMsgBoxSetForeground وهي لجعل صندوق ال رسالة في المقدمة
vbOKCancel تجعل في رسالتك زرين هما موافق و الغاء الامر
vbOKOnly تجعل في رسالتك زر واحد فقط وهو موافق
vbQuestion وهي لوضع ايقونة استفهام التي تاتي في دائرة زرقاء وفيها ؟ في رسالتك
vbRetryCancel تجعل في رسالتك زرين هما اعادة المحاولة و الغاء الامر
vbSystemModal تجعل الرسالة على مستوى النظام
vbYesNo تجعل في رسالتك زرين هما نعم ولا
vbYesNoCancel تجعل في رسالتك ثلاث ازرار هم نعم ولا
وتقدر تشيل علامتين التنصيص بس تحط نص عنصر زي مثلا textbox1.text
طبعا هتقولي ازاي هحط كود برمجي لو كان عندي زرارين
سهلة تقول
if msgbox.a then b
ضع مكان a في النص البرمجي السابق الزر اللي لو انت ضغط عليه حيصل B
وB حتحط الحدث اللي هيحصل لو ضغط علي a
وراجاء اشتركوا في قناتي علي اليوتيوب
هذا ليس سيفيدني يوحدي بال انت ايضا
قناتي علي اليوتيوب
msgbox ("الرسالة",نوع الرسالة,"عنوان الرسالة")
حط مكان نوع الرسالة اي نوع من االلي جايين دول
انواع الرسائل
vbAbortRetryIgnore اي تضع لك بالرسالة ثلاث ازرار هم احباط واعادة محاولة و الغاء الامر
vbApplicationModal اي تضع لك الرسالة على نمط البرنامج ( اي ليس لها علاقة بالويندوز)
vbCritical وهي لوضع ايقونة خطأ اي × في رسالتك
vbDefaultButton1 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الاول
vbDefaultButton2 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الثاني ( لكن بالطبع يجب ان يكون عندك رسالة فيها اكثر من زرين)
vbDefaultButton3 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الثالث ( لكن بالطبع يجب ان يكون عندك بالرسالة فيها اكثر من 3 ازرار)
vbDefaultButton4 لجعل الزر الافتراضي الذي يكون محدد فور ظهور السالة هو الزر الرابع ( لكن بالطبع يجب ان يكون عندك بالرسالة فيها اربع ازرار حصراً )
vbExclamation وهي لوضع ايقونة تحذير التي تأتي بمثلث اصفر وفيها ! في رسالتك
vbInformation وهي لوضع ايقونة معلومات الي تأتي بدائرة زرقاء وفيها ! في رسالتك
vbMsgBoxHelpButton اي لتضع لك بالرسالة زر المساعدة "Help" وانت تحدد الكود الذي يظهر عند الضغط عليه ....الخ
vbMsgBoxRight يجعل نص الرسالة من اليمين الى اليسار
vbMsgBoxRtlReading تجعل الازرار و زر × على اليسار
vbMsgBoxSetForeground وهي لجعل صندوق ال رسالة في المقدمة
vbOKCancel تجعل في رسالتك زرين هما موافق و الغاء الامر
vbOKOnly تجعل في رسالتك زر واحد فقط وهو موافق
vbQuestion وهي لوضع ايقونة استفهام التي تاتي في دائرة زرقاء وفيها ؟ في رسالتك
vbRetryCancel تجعل في رسالتك زرين هما اعادة المحاولة و الغاء الامر
vbSystemModal تجعل الرسالة على مستوى النظام
vbYesNo تجعل في رسالتك زرين هما نعم ولا
vbYesNoCancel تجعل في رسالتك ثلاث ازرار هم نعم ولا
وتقدر تشيل علامتين التنصيص بس تحط نص عنصر زي مثلا textbox1.text
طبعا هتقولي ازاي هحط كود برمجي لو كان عندي زرارين
سهلة تقول
if msgbox.a then b
ضع مكان a في النص البرمجي السابق الزر اللي لو انت ضغط عليه حيصل B
وB حتحط الحدث اللي هيحصل لو ضغط علي a
وراجاء اشتركوا في قناتي علي اليوتيوب
هذا ليس سيفيدني يوحدي بال انت ايضا
قناتي علي اليوتيوب