VB HOOK 使用详解