|
 |
 |
 |
| |
 Inverser les boutons de la souris
Cette procédure permet d'inverser les boutons de la souris.
' API pour la procédure InverseBoutonsSouris
Declare Function SwapMouseButton& Lib "user32" (ByVal bSwap As Long)
Public Sub InverseBoutonsSouris(Actif As Boolean)
If Actif = True Then
SwapMouseButton& (True)
Else
SwapMouseButton& (False)
End If
End Sub
|
|
 |
 |
 |
|