+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مكتبة اكواد VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=185)
+--- الموضوع : [كود] إغلاق الفورم عن طريق زر Esc و التعامل مع CancelButton (/showthread.php?tid=36201)
إغلاق الفورم عن طريق زر Esc و التعامل مع CancelButton - Anas Mahmoud - 24-08-20
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته اعضاء المنتدى الكرام
ندخل في الموضوع مباشرة
الكود:
اضف الكود التالي في مشيد الفورم Sub New() بعد InitializeComponent()
كود :
Dim Esc As New Button
AddHandler Esc.Click, Sub(s, e) Close()
Me.CancelButton = Escشغل البرنامج واضغط على زر Esc تلاحظ انه يقوم بغلق الفورم فعلا
الى هنا انتهى الكود فعلا ، الباقي هو الشرح
الشرح:
طيب تعالو نفهم ماذا يحدث ؟
السر في الخاصية CancelButton الخاصة بالفورم ، والتي تضع فيها الزر التي يتم ضغطه عند الضغط على زر Esc من الكيبورد
إقتباس :Definition
Namespace:System.Windows.FormsAssembly:System.Windows.Forms.dll
Gets or sets the button control that is clicked when the user presses the ESC key
[url=https://docs.microsoft.com/en-us/dotnet/api/system.windows.forms.form.cancelbutton?view=netcore-3.1#definition][/url]
لذلك قمنا باضافة زر وهمي وقمنا باضافة حدث Click له ليقوم بغلق الفورم
ثم اضفناه للخاصية CancelButton وبذلك عندما نضغط على الزر Esc يقوم بالضغط على هذا الزر الوهمي الذي يقوم باغلاق الفورم
فكرة جيدة اليس كذلك
طيب الان لو انت عندك بالفعل زر وظيفته اغلاق الفورم ، كل ماعليك فعله ان تقوم باختيار هذا الزر للخاصية CancelButton الخاصة بالفورم .
[attachment=25510]
اتمنى التوفيق للجميع
RE: إغلاق الفورم عن طريق زر Esc و التعامل مع CancelButton - AymanRamadanSaad - 18-06-21
1- In the Form Properties Set KeyPreview = True
2- In the Form KeyDown - Write the below code
If e.KeyCode = Keys.Escape Then
Me.Close
Exit Sub
End If