VB模拟鼠标点击要怎么弄?

我想按住键盘上"E"键.实现VB按住鼠标左键.
单击"E"实现单击鼠标左键我已经会了,
但是按住"E"实现鼠标左键"不放",放开E再实现放开鼠标左键要怎么弄?
就是E按住鼠标左键按住,E弹起鼠标左键弹起!

---

加个变量定义为布尔型，如 Dim Kkeep as Boolean
在键盘悉顷按粗厅下的过程（KeyDown）中判断是不是E键，如果是则置Kkeep=true
在键盘弹下的过程（KeyUp）中判断是不是E键睁凳陆，如果是则置Kkeep=False
利用Kkeep的值就要以了

---