这是个HOTKEY程序 就是APrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongPrivate Const WM_SETHOTKEY = &H32Private Sub Form_Load() Dim l As Long Dim wHotkey As Long
wHotkey = 65 l = SendMessage(Me.hwnd, WM_SETHOTKEY, wHotkey, 0) End Sub问题是,怎么样让他变成内挂,出现在游戏界面里?
我也想知道
顶一下!!!
请高手赐教
就是APrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongPrivate Const WM_SETHOTKEY = &H32Private Sub Form_Load()
Dim l As Long
Dim wHotkey As Long
wHotkey = 65
l = SendMessage(Me.hwnd, WM_SETHOTKEY, wHotkey, 0)
End Sub问题是,怎么样让他变成内挂,出现在游戏界面里?