Visual Basic 滑鼠工具類別

本類別為模擬滑鼠事件而設計，主要運用函數為 mouse_event ，本類別仍在發展中，部分程式碼尚未充分測試完畢，為配合網友需求，先行將部分程式碼上網，未來仍有可能依個人工作或研究上之需求進行調整

請問: 我想在某一VB6撰寫的專案系統中，限制使用者按滑鼠右鍵，在此系統畫面任何地方都無法按滑鼠右鍵，我目前只知道在每個原件上撰寫MouseDown事件，但若有100個TextBox時，我就要撰寫1000個 MouseDown事件，這樣太麻煩了，是否有較簡單的方法呢?

使用滑鼠事件來處理滑鼠輸入的概觀。 每個事件都可能會提供相關聯的資料。 本文提供滑鼠相關事件的清單。

我以前寫過一篇《VBS調用Windows API函數》，本以為既然都能調用API了，用VBS控制滑鼠還不是很簡單是事？ 事實證明我錯了，不明真相的同學永遠是大多數，不知道API是什麼的VBSer大有人在。

'因為是透過滑鼠右鍵點選TextBox,所以右鍵並不會建立滑鼠游標位置 需要透過滑鼠移動到TextBox,讓該TextBox得到Focus 但是目前會自動選取全部 而且不能在mousemove裡面指定游標位置,一移動就指定 要再想辦法說讓他游標位置放在最後 (暫時還沒做)

在上面的參數中，Button As Integer定義了參數Button，該參數是用於確定按下的是滑鼠的左鍵，右鍵，還是中鍵，其取值如下表所示。

實驗：執行程式，按下並彈起shift鍵即可發生乙個滑鼠左鍵click,按下並彈起空格鍵即可產生乙個滑鼠右鍵click，注意不要一直按住不放否則可能導致連鎖反應。