Меню Visual Basic

       

Событие ItemRemoved


Данное событие происходит после удаления ссылки из проекта.

Синтаксис

Sub объект_ItemRemoved(ByVal элемент As Reference)

Обязательный аргумент элемент указывает объект Reference, который был удален.

Пример события "Нажатие кнопки" (Click)

В данном примере проиллюстрировано, как можно написать программу для процедуры события "Нажатие кнопки" (Click) с помощью инструкций WithEvents и Set. Следует отметить, что вместо пункта меню Сервис в имени события "Нажатие кнопки" (Click) используется ссылка на объект ce.

Private WithEvents ce As CommandBarEvents

Sub Test()

Dim c As CommandBarControl

Set c = Application.VBE.CommandBars("Сервис").Controls(1)

Set ce = Application.VBE.Events.CommandBarEvents(c)

End Sub

Private Sub ce_Click(ByVal CommandBarControl As Object, Handled As Boolean, CancelDefault As Boolean)

' Место для инструкций обработки события.

End Sub



Содержание раздела