The thing is that you use GetAsyncKeyState, wtf is wrong with you? There is an API for hotkeys called RegisterHotkey.
Anyways, I guess this tutorial is as good as its gonna be considering its in Visual Basic, however there is really no need for half of the code in the module.