[sendbad100]

(20-01-17, 07:43 PM)Microformt كتب :

(20-01-17, 07:23 PM)sendbad100 كتب : وعليكم السلام ورحمة الله وبركاته

تفضل

كود :

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 114 Then Unload Me
End Sub

Private Sub Form_Load()
Me.KeyPreview = True
End Sub

اخي الكرم
 السلام عليكم 
إجابة غير موفقه 
 ارجوك إقراء السوال كامل ثم الاجابة عليه إذا سمحت ؟؟
 تحياتي

الاجابة كاملة وصحيحة ومجربة حسب طلبك