تقييم الموضوع :
  • 1 أصوات - بمعدل 2
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] برامج بالفييجول بيسك عن msgbox+dialogbox
#1
ااناا عضو جديد في هذا المنتدى :
فضلا وليس امرا .. الدكتور طلب مننا مشروع وهو اننا نصمم برامج بالفييجول بيسك عن msgbox+dialogboxHuh واناا لسه مبتدئه بالفيجول بيسك فياريت لو الاقي الاجابه عندكم ...
الرد }}}}
تم الشكر بواسطة:
#2
منقول =============
ونسألكم الدعاء


messagebox.show("the_msg","title")

كود حذف سجل برسائل تأكيد مع موجود أكثر من سطر في صندوق الرسائل

If MsgBox("هل أنت متأكد من حذف بيانات الطالب الحالي", MsgBoxStyle.YesNo, Title:="رسالة تأكيد الحذف") = vbYes Then

If MsgBox("سيتم حذف بيانات الطالب :ـ" + vbCrLf + Full_name_fTextBox.Text, MsgBoxStyle.YesNo, Title:="رسالة تأكيد الحذف") = vbYes Then
Me.Table_firstBindingSource.RemoveCurrent()

انتهى



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
__________________________________________________
الرد }}}}
تم الشكر بواسطة:
#3
سلام عليكم Big Grin
تم نقل الموضوع لقسم الأسئلة لأنه الآن بالقسم الرئيسي Blush
اللَّهُمَّ أَنْتَ رَبِّي ، لا إِلَه إِلاَّ أَنْتَ خَلَقْتَني وأَنَا عَبْدُكَ ، وأَنَا على عهْدِكَ ووعْدِكَ ما اسْتَطَعْتُ ، أَعُوذُ بِكَ مِنْ شَرِّ ما صنَعْتُ ، أَبوءُ لَكَ بِنِعْمتِكَ علَيَ ، وأَبُوءُ بذَنْبي فَاغْفِرْ لي ، فَإِنَّهُ لا يغْفِرُ الذُّنُوبِ إِلاَّ أَنْتَ .
الرد }}}}
تم الشكر بواسطة:
#4
جزاااااااااكـ الله خير ....
الرد }}}}
تم الشكر بواسطة: Omar Mekkawy


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Information [VB.NET] مساعده في الفيجوال بيسك هل اقدر اسوي اكثر من فورم a_abdullah 4 96 07-12-16, 02:39 PM
آخر رد: a_abdullah
  طريقة عمل قائمة خصائص شبية باالموجودةفي برنامج الفيجوال بيسك CLARO 1 58 07-12-16, 12:20 AM
آخر رد: amgad525
  نقل واسترجاع ملفات بواسطة الفيجوال بيسك عبدالرحمن المكاوي 25 521 05-12-16, 08:30 PM
آخر رد: عبدالرحمن المكاوي
  [سؤال] مساعدة في الفيجوال بيسك عبدالرحمن المكاوي 1 67 28-11-16, 02:11 PM
آخر رد: عبدالرحمن المكاوي
  عمل شاشة تسجيل دخول لبرنامج عبر فيجوال بيسك 2008 hishamdafer 2 115 12-11-16, 06:39 PM
آخر رد: thevirus
  لانشاء فولدر فى مسار محدد بالفيجوال بيسك nabil.1710 4 96 07-11-16, 06:31 PM
آخر رد: nabil.1710
  اريد مساعدة في التعامل مع هذا الموقع بالفيجوال بيسك soper 2 86 03-11-16, 07:08 PM
آخر رد: soper
  [VB.NET] عايزة اربط الداتا جريد في الفيجوال بيسك .net باداة الريبورت فيور عشان تطلع التقرير Asmaa adel 2 108 25-10-16, 11:42 PM
آخر رد: Asmaa adel
  [VB.NET] رجاء المساعدة:سؤالي عن التقارير في الفيجوال بيسك دوت نت Asmaa adel 2 117 20-10-16, 09:41 AM
آخر رد: Asmaa adel
  [VB.NET] مشكلة عند تشغيل الفيجوال بيسك دوت نت Asmaa adel 1 79 20-10-16, 02:22 AM
آخر رد: جوري

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم