Access (的 Form.MouseDown 事件)

MouseDown 事件會在使用者按下滑鼠按鈕時發生。

語法

運算式。MouseDown (Button、 Shift、 X、 Y)

expression 代表 Form 物件的變數。

參數

名稱	必要/選用	資料類型	描述
Button	必要	Integer	用來引動事件的按鈕。 如果您需要測試 Button 引數，可以使用下列其中一個內部常數作為位元遮罩： acLeftButton 滑鼠左鍵的位元遮罩。 acrightbutton 右鍵 是右滑鼠按鈕位元遮罩。 acmiddlebutton 鍵 滑鼠中間鍵的位元遮罩。
Shift	必要	整數	按下或放開 Button 引數所指定的按鈕時， Shift 、Ctrl 和 ALT 鍵的狀態。 如果您需要測試 Shift 引數，您可以使用下列其中一個內部常數作為位元遮罩： acShiftMask Shift 鍵的位元遮罩。 acCtrlMask Ctrl 鍵的位元遮罩。 acAltMask ALT 鍵的位元遮罩。
X	必要	Single	滑鼠指標目前位置的 x 座標，以 twip 為單位。
Y	必要	Single	滑鼠指標目前位置的 y 座標，以 twip 為單位。

註解

MouseDown事件僅適用于表單、表單區段和表單上的控制項，不適用於報表上的控制項。

此事件不適用於附加到另一個控制項的標籤，例如文字方塊的標籤。 它只適用於「獨立式」標籤。 在附加標籤上按下及放開滑鼠按鈕的效果，與在關聯控制項上按下及放開滑鼠按鈕的效果相同。 此時所發生的事件為控制項的一般事件，而非附加標籤的個別事件。

發生這些事件時執行巨集或事件程序，將 OnMouseDown 屬性設定為巨集名稱或 [事件程序]。

使用 MouseDown 事件來指定按下或放開特定滑鼠按鍵時會發生什麼事。 按一下 [ 和 DblClick 事件，不同 MouseDown 事件可讓您區分左、 右及中間滑鼠按鈕。 您也可以為使用 Shift、Ctrl 和 ALT 鍵的滑鼠鍵盤組合撰寫程式碼。

若要導致 引發 MouseDown 事件發生在表單、 表單按下滑鼠按鈕中的空白區域或記錄選取器。 若要使表單] 區段中發生 MouseDown 事件，按下滑鼠按鈕 [表單] 區段中的空白區域中。

下列情況適用於 MouseDown 事件：

• 如果按下滑鼠按鈕指標位於表單或控制項，該物件便會接收所有的滑鼠事件，且包含最後一個 MouseUp 事件。

• 若是連續按下滑鼠按鈕，則在第一次按下之後收到滑鼠事件的物件會接收所有的滑鼠事件，直到所有的按鈕都放開為止。

若要回應移動滑鼠所引發的事件，您可以使用 MouseMove 事件。

範例

下列範例示範如何找出哪一個滑鼠按鍵造成 MouseDown 事件。

若要嘗試此範例，請將下列事件程序新增至表單中。

Private Sub Form_MouseDown(Button As Integer, _ 
         Shift As Integer, X As Single, _ 
         Y As Single) 
    If Button = acLeftButton Then 
        MsgBox "You pressed the left button." 
    End If 
    If Button = acRightButton Then 
        MsgBox "You pressed the right button." 
    End If 
    If Button = acMiddleButton Then 
        MsgBox "You pressed the middle button." 
    End If 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。