Posted on January 5, 2009
1
2
3
4
5
6
7
8
9
10
| 'System & API - How to Get the number of Mouse Buttons
Option Explicit
Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
Const SM_CMOUSEBUTTONS = 43
Private Sub Main()
MsgBox GetSystemMetrics(SM_CMOUSEBUTTONS)
End Sub |