Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Происходит при нажатии кнопки мыши при наведении указателя на диаграмму.
Синтаксис
expression. MouseDown (Button, SHIFT, x, y)
выражение: переменная, представляющая объект Chart.
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Button | Обязательный | Long | Отпущенная кнопка мыши. Может быть одной из следующих констант XlMouseButton : xlNoButton, xlPrimaryButton или xlSecondaryButton. |
| Shift | Обязательный | Long | Состояние клавиш SHIFT, CTRL и AlShift, CTRL и ALTTShift, CTRL и ALT при возникновении события. Может быть одним из значений или суммой значений. |
| x | Обязательный | Long | Координата x указателя мыши в клиентских координатах объекта диаграммы. |
| y | Обязательный | Long | Координата y указателя мыши в клиентских координатах объекта диаграммы. |
Возвращаемое значение
Отсутствует
Примечания
В следующей таблице указаны значения параметра Shift .
| Значение | Описание |
|---|---|
| 0 (ноль) | Нет ключей |
| 1 | Клавиша SHIFT |
| 2 | Клавиша CTRL |
| 4 | Клавиша ALT |
Пример
Этот пример выполняется при нажатии кнопки мыши, когда указатель на диаграмму.
Private Sub Chart_MouseDown(ByVal Button As Long, _
ByVal Shift As Long, ByVal X As Long, ByVal Y As Long)
MsgBox "Button = " & Button & chr$(13) & _
"Shift = " & Shift & chr$(13) & _
"X = " & X & " Y = " & Y
End Sub
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.