نقر على زر ( الرسالة ) باستخدام F5 على لوحة المفاتيح

kajin.tha60 · ديسمبر 24, 2020

New.accdb

**jjafferr** · ديسمبر 24, 2020

وعليكم السلام 🙂

image.png.9de0588804053749cf7d1ec62159dde8.png

.

image.png.233dcd35bc9ce666ed4436ddf86babfe.png

.

الآن نريد معرفة رقم الزر F5 :

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
    
    MsgBox KeyCode
End Sub

.

وعند فتح النموذج ، نضغط على الزر F5 ، فنحصل على رقمه :

image.png.698cfbf3de6af6be52d6e0a92279ae70.png

.

الآن نعود الى الحدث اعلاه ، ونخبر الاكسس ما نريد عمله عند الضغط على الزر F5 (الذي رقمه 116) :

حدث النقر على الزر الاحمر "الرسالة
Private Sub cmd_F5_Click()

    MsgBox "السلام عليكم"
End Sub


  
Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
    
    If KeyCode = 116 Then

        Call cmd_F5_Click   '<---- ننادي الحدث اعلاه
    End If
    
End Sub