چگونه با استفاده از ویژوال بیسیک کلید چپ و راست ماوس را تغییر دهیم

چگونه با استفاده از ویژوال بیسیک کلید چپ و راست ماوس را تغییر دهیم

یک پروژه جدید باز کنید و تو فرمتون یک Command Button و دو تا Option Button بزارید و کد زیر رو تو قسمت جنرال فرمتون کپی کنید :

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

()Private Sub Command1_Click

    (Call SwapMouseButton(Option1.Value

End Sub

()Private Sub Form_Load

"Me.caption = "AminSoltani

   "Option1.Caption = "Right

   "Option2.Caption = "Left

End Sub