سلام دوستان مهربانم
من يك كد مي خواهم كه نشان دهد كليد شيفت نگه داشته شده است به غير از getasynckeystate
لطفا راهنمايي كنيد
يك مثال هم بزنيد خيلي بهتر است
Printable View
سلام دوستان مهربانم
من يك كد مي خواهم كه نشان دهد كليد شيفت نگه داشته شده است به غير از getasynckeystate
لطفا راهنمايي كنيد
يك مثال هم بزنيد خيلي بهتر است
برای دسترسی به بافر صفحه کلید getasynckeystate تنها روش موجود هست و یا این که از ثباتها استفاده کنی .
که با دستور Peek امکان پذیر هست . و در غیر این صورت تشخیص شما محدود به داخل نرم افزارتان خواهد بود .
یعنی اگر روی نرم افزار دیگری فکوس شود و کلید اشاره شده را فشار دهند دیگر سیستم قادر به تشخیص آن نخواهد بود.
از این دستور چگونه استفاده می کنند(peek)نقل قول:
با سلام.
میخواهم در مورد نوشتن یک برنامه در محیط vb.net کمکم کنید .
سوال: برنامه ای که دو عدد را از ورودی خوانده و با استفاده از روش جمع با یکدیگر ضرب کند
3+3+3+3=3*4
سوال خود را در پست جدید مطرح کنید
سلام.
برای تشخیص کلید خارج از برنامه:
کد:Private Declare Function GetKeyPress Lib "user32" Alias "GetAsyncKeyState" (ByVal key As Long) As Long
برای تشخیص کلید داخل برنامه از رویدادهای Key_Down و Key_Press استفاده کنید.کد:Private Declare Function GetKeyState Lib "user32" Alias "GetKeyState" (ByVal nVirtKey As Long) As Integer
نقل قول:
شما باید سوال خودتون را در بخش Netframe work. و در یه تاپیک مجزا مطرح می کردید.
اما برای خیر مقدم و با اجازه دوستمون MichaelQwerty
Dim M, N, Total As Integer
M = Val(TextBox1.Text)
N = Val(TextBox2.Text)
For I As Integer = 1 To M
Total = Total + N
Next
TextBox3.Text = Total
Private Declare Function GetKeyState Lib "user32" Alias "GetKeyState" (ByVal nVirtKey As Long) As Integer
میشه از این یه مثال بزنید دوست عزیزم
تعاریف عمومی:
Private Const VK_LSHIFT = &HA0
Private Const VK_RSHIFT = &HA1
Private Const KEY_MASK As Integer = &HFF80
=======================================
در رویداد کلیک دکمه یا تایمر :
If GetKeyState(VK_RSHIFT) And KEY_MASK Then
'Do Something
ElseIf GetKeyState(VK_LSHIFT) And KEY_MASK Then
'Do Something
End If