不用DLL实现VB全局钩子

下为全局键盘钩子（也称系统键盘钩子）的代码，原文资料是英文的，在下也只是勉强能看懂，按照其步骤试了一下，的确可行，如果需要，我会将全文贴上来的 代码功能：实时监测Caps Lock、NumLock、Scroll Lock三个按件的状态，并显示在Label1 Label2 Label3三个标签中 ''.bas模块中