Mouse Button Swapper

swap the mouse buttons with this API.

Original Author: LCSBSSRHXXX

API Declarations

Private Declare Function SwapMouseButton Lib "user32" (ByVal bSwap As Long) As Long

Code

Private Declare Function SwapMouseButton Lib "user32" (ByVal bSwap As Long) As Long
Private Sub Form_Load()
DoEvents
  SwapMouseButton 1
DoEvents
  Unload Me
End Sub

About this post

Posted: 2003-06-01
By: ArchiveBot
Viewed: 99 times

Categories

Visual Basic 6

Attachments

No attachments for this post

Comments

No comments have been added for this post.

You must be logged in to make a comment.