alt+F11 ايقاف

**Ahmed.IQ** · مارس 29, 2017

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

هل هناك طريقة لايقاف عمل alt+F11

**Shivan Rekany** · مارس 29, 2017

منذ ساعه, Ahmed.IQ said:

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

هل هناك طريقة لايقاف عمل alt+F11

اليك هذا الكود

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   Select Case KeyCode
      Case 122
         KeyCode = 0
   End Select
End Sub

لكن لازم تتغير خاصية Key Preview الى نعم للنموذج

او يجب تستخدم هذا الكود معه

Private Sub Form_Open(Cancel As Integer)
Me.KeyPreview = True
End Sub

تحياتي

**Ahmed.IQ** · مارس 30, 2017

عاشت ايدك مضبوط

**النجاشي** · أبريل 11, 2017

ربي يبارك فيك اخي@Shivan Rekany أبو محمد ممتاز جدا

تم تعديل أبريل 11, 2017 بواسطه ابو زاهر

الردود الموصى بها