Shift + Click

[Ali_mx]

چطور میشه این رو برای مثلا یه Button تعریف کرد؟
:roll:

[علیرضا مداح]

سلام .
ابتدا متغیر زیر را به صورت عمومی اعلان کنید(در زیر قسمت Windows Form Designer generated code : (از این متغیر برای مطلع شدن از اینکه آیا کلید Shift نگه داشته شده است یا نه استفاده میشود) .


Dim IsShiftDown As Boolean

سپس در رویداد KeyDown مربوطه به کنترل Button کد زیر را وارد نمایید :


If e.Shift = True Then
IsShiftDown = True
Else
IsShiftDown = False
End If

در صورتی که کلید Shift پایین نگه داشته شده باشد مقدار متغیر IsShiftDown برابر True و در غیر اینصورت مساوی False خواهد بود .
سپس کد زیر را درون رویداد MouseDown مربوط به کنترل Button وارد نمایید :


If isshiftdown And e.Button = MouseButtons.Left Then
'Do Something
End If

[Ali_mx]

:wink:
خودشه
خیلی ممنون
:sunglass: