主要是要通過兩個方面：
（一）對鼠標的停留位置做出判斷，也就是得到鼠標在屏幕上停留的位置。
（二）將鼠標的移動到所確定的位置上。 而實現這個功能則要使用到SetCursorPos這個函數，此函數的功能是設定鼠標位置。
這個函數的聲明如下：
Public Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
而僅僅有這個函數是不夠的，還需要定義一個type格式的自定義變量。定義為：
Public Type POINTAPI
x As Long
y As Long
End Type
它用於存放鼠標的位置（屏幕上的位置）。
但是一個新的問題又出現了：鼠標到底放在哪裡呢？也就是如何獲得屏幕上的位置。
這個問題就要用到另一個函數：GetCursorPos，它的功能是獲得屏幕上鼠標的坐標。
它的聲明如下：
Public Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
這樣就可以通過GetCursorPos函數獲得鼠標的位置，存放到一個POINTAPI變量中，再通過SetCursorPos函數來設置鼠標的位置。
這樣就可以十分順利的來控制鼠標了！
