کد های بخش Genral
Private Declare Function SwapMouseButton Lib "User32" (ByVal bSwap As Long) As Long
کد داخل CommandButton1
Call SwapMouseButton(0)
کد داخل CommandButton2
Call SwapMouseButton(1)