تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طريقة الغاء اغلاق البرنامج بواسطة المفاتيح alt + f4
#1
السلام عليكم ورحمة الله وبركاته

لو سمحتوا يا اخواني انا اريد طريقة الغاء اغلاق البرنامج من alt + f4
وارجوا سرعة الرد
الرد }}}
تم الشكر بواسطة:
#2
تفضل
كود :
Public Class Form1
    Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.Modifiers = Keys.Alt And e.KeyCode = Keys.F4 Then
            Me.Close()
        End If
    End Sub
End Class
الرد }}}
تم الشكر بواسطة:
#3
وعليكم السلام ورحمة الله وبركاته
في البداية يجب أن تغير قيمة الخاصية KeyPreview للفورم إلى True
ثم ضع هذا الكود
كود :
Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.Modifiers = Keys.Alt And e.KeyCode = Keys.F4 Then
            e.SuppressKeyPress = True
        End If
    End Sub

بالتوفيق
الرد }}}
تم الشكر بواسطة:
#4
اولا شكرا اخي علي الكود
لكن اخي عندما اضع الكود هنا
كود :
Public Class Form1
    Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.Modifiers = Keys.Alt And e.KeyCode = Keys.F4 Then
            MsgBox("Thank You My Friend")
        End If
    End Sub
End Class
يتم اظهار الرسالة
وعند الضغط علي OK
يغلق البرنامج لكن انا اخي اريدة عند الضغط لا يغلق البرنامج
الرد }}}
تم الشكر بواسطة:
#5
شكرا لك اخي sooriaty03 تم الحل
الرد }}}
تم الشكر بواسطة:
#6
انظري المشاركة السابقة
أو اضغطي على هذا الرابط
#3

بالتوفيق
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Exclamation [سؤال] كيف يمكن الغاء السوال عند الكتابة على ملف موجود dell 0 48 19-03-24, 01:23 AM
آخر رد: dell
  مشكلة عند نقل البرنامج من فيجوال 2013 الى فيجوال 2017 strongriseman 5 148 12-03-24, 10:37 AM
آخر رد: strongriseman
  محتاج طريقة لتنسيق نص الرسالة المرسلة إلى الواتس اب new_programer 2 163 04-03-24, 07:15 AM
آخر رد: new_programer
  محتاج تشفير فيديو وتشغلية عن طريق البرنامج فقط new_programer 1 112 22-02-24, 12:09 PM
آخر رد: AHMED213
  طريقة اجراء نسخة احتياطية و استرجاعها ؟ Osama NY 2 461 07-02-24, 08:59 PM
آخر رد: Kamil
  مطلوب كود الطباعة لهذا البرنامج melad2002 2 234 13-01-24, 06:42 PM
آخر رد: melad2002
  مشكلة تعليق البرنامج في حال عدم وجود ماسح ضوئي متصل بالكمبيوتر صالح عبدالله 1 210 09-01-24, 10:51 PM
آخر رد: صالح عبدالله
  ماهي طريقة نقل محتويات checkedlistbox الى داتاقريدفيو صالح عبدالله 3 253 06-01-24, 03:20 PM
آخر رد: Kamil
  [VB.NET] ما هي طريقة استدعاء الازرار في الكيبورد من خلار زر افتراضي haider.mohsin92 1 295 14-12-23, 03:19 PM
آخر رد: Kamil
  طريقة عرض التقرير كريستال ريبورت في جهاز العميل Adel27213 2 347 10-12-23, 04:03 AM
آخر رد: Adel27213

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


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