الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال ارجو ان اجد له اجابة

مغلق
بدأه MSrahieb_100 في 3 يناير 2005 · 2 رد · 413 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم و رحمة الله وبركاته

لدى سؤال ارجو ان اجد له اجابة :unsure:

كيف اظهر MsgBox تسال المستخدم اذا كان يريد الخروج ام لا عند الضغط

على علامة الغلق فى الفورم(X)

و طبعا عند الضغط على (لا)

لا يتم تنفيذ الغلق

و شكرا

ان اجــمل الزهـــــــــــر مانـــــبت بحــــــــدائق الاحـــــــــــــــزان

Eng. Mohammed Salah

#2

بسيطة عزيزي

Private Sub Form_Unload(Cancel As Integer)

    Msg0001 = MsgBox("Are you sure you want to exit now ?", vbQuestion + vbYesNo)
If Msg0001 = vbYes Then

    End
    
        Else
        
    Cancel = True
    
End If

End Sub

كما هو واضح الكود يوضع في الحدث Unload الخاص بالفورم

تحياتي لك :blink:

تم تعديل هذه المشاركة بواسطة prof_1982 في 3 يناير 2005 في 03:47

الإنسان الذي يقول بأنه لا يمكن عمل شيء يجب ألا يعيق مطلقاً الإنسان الذي يقوم بعمل ذلك الشيء.

إن تخطئ فأنت إنسان ... أما أن تلوم جهازك الكمبيوتر على خطأك فهذا أكثر إنسانية.

#3

مشكور اخى Prof 1982

ان اجــمل الزهـــــــــــر مانـــــبت بحــــــــدائق الاحـــــــــــــــزان

Eng. Mohammed Salah

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…