كود تعطيل زر الفاره الايمن

اخي الكريم

تستطيع تعطيل زري الفأرة الايمن او الايسر بالطريقة التالية

1. عن طريق الكود

Private Sub Form_KeyPress(KeyAscii As Integer)
If Button = vbKeyRButton Then
  DoCmd.CancelEvent
End If
End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbKeyRButton Then
 DoCmd.CancelEvent
End If
End Sub

2. اعرض النموذج في عرض التصميم واختر خصائص النموذج

من تبويب الكل ستجد " قائمة مختصره " القيمة الافتراضية لها هي نعم عدلها الى لا

وهذا مثال حاول استخدام زر الماوس الايمن على النموذج

MOUSE.rar

اختكم

زهره

زهره

لك كل الشكر مني وعلى عملك .... بس ابي مسج message يطلع عند استخدام ازر الايمن اذا اممكن.........