تشخيص فشرده شده Key+‍Click

[A.Farzin]

تشخيص فشرده شدن Key+‍Click
با سلام
در مورد تشخيص فشرده شدن كليدهاي تركيبي صفحه كليد قبلا صحبت شده
اگر بخواهيم تركيب شدن كليدهاي صفحه كليد را با كليك چپ و يا راست ماوس شناسائي كنيم چه بايد كرد؟
ممنون

[r0ot$harp]

تشخيص فشرده شدن Key+‍Click
با سلام
در مورد تشخيص فشرده شدن كليدهاي تركيبي صفحه كليد قبلا صحبت شده
اگر بخواهيم تركيب شدن كليدهاي صفحه كليد را با كليك چپ و يا راست ماوس شناسائي كنيم چه بايد كرد؟
ممنون

دوست عزیز اینم خدمت شما .


Dim State As String

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
State = KeyCode
End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

Select Case Button

Case 1
' MsgBox "Left Click"
Case 2
' MsgBox "Right Click"
Case 4
' MsgBox "Center(Delta) Click"

End Select

If State = "" Then Exit Sub
If Button = 1 And State = vbKeyA Then State = "": MsgBox "SA"

End Sub


برای تشخیص کلید چپ موس و حرف A .



باتشکر احسان

[hamed aj]

با سلام

دوست عزیز؛

رویداد های ماوس (MouseDown , MouseMove , MouseUp) دارای پارامتری به نام Button هستند که با کنترل این پارامتر می توانید به نتیجه دلخواه تون برسید

مثلاً برای چک کردن اینکه کاربر کلیک چپ کرده یا نه از کد زیر استفاده کنید :





If (Button = 1) Then
MsgBox "Left Click"
End If



موفق باشید

[r0ot$harp]

با سلام

دوست عزیز؛

رویداد های ماوس (MouseDown , MouseMove , MouseUp) دارای پارامتری به نام Button هستند که با کنترل این پارامتر می توانید به نتیجه دلخواه تون برسید

مثلاً برای چک کردن اینکه کاربر کلیک چپ کرده یا نه از کد زیر استفاده کنید :





If (Button = 1) Then
MsgBox "Left Click"
End If

موفق باشید


دوست عزیز بهتر نیست به متن سوال ایشون دقت کنید ؟


اگر بخواهيم تركيب شدن كليدهاي صفحه كليد را با كليك چپ و يا راست ماوس شناسائي كنيم چه بايد كرد؟



باتشکر احسان

[Pr0grammer]

شکل کلی رویداد Mouse Down این طوریه :


Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

End Sub


آرگومان Button واسه دکمه ای که فشار داده شده (ماوس) :
1- کلیک چپ
2- کلیک راست
4- برای دکمه وسط

آرگومان Shift هم فشار داده شدن دکمه های Alt ، Ctrl یا Shift (همزمان بارویداد) رو منعکس می کنه:
4= Alt
2= Ctrl
1= Shift

آرگومان های X و Y مکان دقیق ماوس رو هنگام ایجاد این رویداد برمی گردونند.

موفق باشید

[ab_ba]

اگر بخواهیم خارج از محیط برنامه فشرده شدن کلید وسط ماوس را تشخیص دهیم چه کنیم