请教,在VB中能用鼠标键做快捷键吗

请问各位大哥,在VB中能用鼠标键做快捷键吗?
小弟经常玩一些单机的射击游戏,而有很多的游戏没有连发功能(按住鼠标,就一直开枪),所以想弄个小程序,实现按住鼠标的左键,鼠标就连点,松开就停止的小工具,而不是像网上到处都有的那种用键盘的按键做快捷键的工具。
  我是这样构想的,弄个全局热键,用鼠标的左键按下(MOUSEEVENTF_LEFTDOWN)做为开始的快捷键,用鼠标的左键抬起(MOUSEEVENTF_LEFTUP)做为关闭的快捷键;用vbKeyLButton或vbKeyRButton也不行,但是这样不成功,那正确的应该是怎么样写的呢,请各位帮帮忙,用键盘做热键的就不用说了,这个我知道。

------解决方案--------------------
使用Mouse_event连续发送鼠标单击消息就可以了
------解决方案--------------------
不做hook,用定时器,定时判断 GetAsyncKeyState(VK_LBUTTON),如果左键按下,则模拟发送点击消息。
------解决方案--------------------
探讨硬件有话只会简单的换个微动什么的,GetAsyncKeyState试过,不行,它只能把单击变双击而已,不能持续