csfungamer
Mitglied
Für mein klienes Programm will ich nen hotkey machen und habe im I-Net diesen Code gefunden.
Leider habe ich ihn nicht ganz verstanden und ich hoffe
ihr könnt mir sagen wie es geht das wenn ich F4 drücke ne Function ausgeführ wird.
Code:
Private Declare Function SendMessage Lib "user32" _
Alias "SendMessageA" (ByVal hwnd As Long, _
ByVal wMsg As Long, ByVal wParam As Long, _
lParam As Any) As Long
Const VK_F1 = &H70
Const VK_F2 = &H71
Const VK_F3 = &H72
Const VK_F4 = &H73
Const WM_SETHOTKEY = &H32
Private Sub Command1_Click()
Call SendMessage(Me.hwnd, WM_SETHOTKEY, VK_F4, 0&)
Me.WindowState = 1
MsgBox "Schließen Sie diese Mesagebox und " _
& "betätigen Sie danach die F4-Taste!"
End Sub
Leider habe ich ihn nicht ganz verstanden und ich hoffe
ihr könnt mir sagen wie es geht das wenn ich F4 drücke ne Function ausgeführ wird.