[Virtual Basic 2008] Hotkey Funktion ! Help :S

[germanhacker]

Hallo elitepvpers,
Ich wollte eine Combobox in mein Programm einbringen, wo man einen beliebigen Hotkey aussuchen kann.

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        Dim MouseMoverOn As Boolean
        MouseMoverOn = GetAsyncKeyState(ComboBox1.Text)
        If MouseMoverOn = True Then
            Timer1.Enabled = True
        End If
    End Sub

Doch dieser Code hat leider nicht funktioniert

Hoffe jemand hat eine Lösung !

PS: Wäre auch schön wenn man den Hotkey durch Tastendruck bestimmen kann.

[Madd Eye]

Also einen Hotkey einzubauen ist in Vb ganz einfach

Du braucht nur einen Button

Public Class Form1
    Private Declare Function GetAsyncKeyState Lib "user32.dll" ( _
  ByVal vKey As Long) As Long

    Private Const VK_X = &H58

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim Retval As Long

        Retval = GetAsyncKeyState(VK_X)

        ' Auswerten des Ergebnisses
        If CBool(Retval And &H8000) Then
            MsgBox("Die Taste ""X"" ist momentan gedrückt.")
        End If
    End Sub
End Class