Событие Form.MouseDown (Access)

Статья
04/07/2023

Событие MouseDown возникает, когда пользователь нажимает кнопку мыши.

Синтаксис

expression. MouseDown (Кнопка, SHIFT, X, Y)

выражение: переменная, представляющая объект Form.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Button	Обязательный	Integer	Кнопка, нажатая для активации события. Если необходимо протестировать аргумент Button , в качестве битовых масок можно использовать одну из следующих встроенных констант: acLeftButton Битовая маска для левой кнопки мыши. acRightButton Битовая маска для правой кнопки мыши. acMiddleButton Битовая маска для средней кнопки мыши.
Shift	Обязательный	Integer	Состояние клавиш SHIFT, CTRL и ALT при нажатии или освобождении кнопки, указанной в аргументе Button . Если необходимо протестировать аргумент Shift , можно использовать одну из следующих встроенных констант в качестве битовых масок: acShiftMask Битовая маска для клавиши SHIFT. acCtrlMask Битовая маска для клавиши CTRL. acAltMask Битовая маска для клавиши ALT.
X	Обязательный	Single	Координата x для текущего расположения указателя мыши в твипах.
Да	Обязательный	Single	Координата y для текущего расположения указателя мыши в твипах.

Замечания

Событие MouseDown применяется только к формам, разделам форм и элементам управления в форме, а не к элементам управления в отчете.

Это событие не применяется к метки, присоединенной к другому элементу управления, например метка для текстового поля. Он применяется только к "автономным" меткам. Нажатие и освобождение кнопки мыши в присоединенной метке имеет тот же эффект, что и нажатие и освобождение кнопки в связанном элементе управления. Происходят обычные события для элемента управления; для присоединенной метки не происходит отдельных событий.

Чтобы выполнить макрос или процедуру события при возникновении этих событий, задайте для свойства OnMouseDown имя макроса или [Процедура события].

Используйте событие MouseDown , чтобы указать, что происходит при нажатии или освобождении определенной кнопки мыши. В отличие от событий Click и 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 и обратная связь.

Поделиться через