bunu import et
Imports System.Runtime.InteropServices
bunu üste ekle
<DllImport("user32.dll")> _
Public Shared Function GetAsyncKeyState(ByVal vKey As System.Windows.Forms.Keys) As Short
End Function
timer ekle interval = 100
enable = true olsun
timer kodu içine
If GetAsyncKeyState(Keys.Q) Then
Button1.ForeColor = Color.LimeGreen ' Klavyeden Q ya basılırsa buton1 yazı rengi yeşil olsun
ElseIf GetAsyncKeyState(Keys.W) Then
Button2.ForeColor = Color.LimeGreen ' Klavyeden w ya basılırsa buton2 yazı rengi yeşil olsun
ElseIf GetAsyncKeyState(Keys.E) Then
Button3.ForeColor = Color.LimeGreen ' Klavyeden e ya basılırsa buton3 yazı rengi yeşil olsun
Else
Button1.ForeColor = Color.Black ' Tuş bırakıldığında yazı rengi siyah olsun
Button2.ForeColor = Color.Black ' " " "
Button3.ForeColor = Color.Black' " " "
End If