Метод CreateEventProc.

Создает процедуру обработки события.

Синтаксис
объект.CreateEventProc(событие, источник) As Long

Параметры
объект
Обязательный. Объектное выражение, значением которого является один из объектов, перечисленных в списке "Применение".
событие
Обязательный. Строковое выражение, указывающее имя события, которое добавляется в модуль.
источник
Обязательный. Строковое выражения, указывающее имя объекта, который является источником события.

Дополнительные сведения
Метод CreateEventProc используется для создания процедуры обработки события. Например, чтобы создать процедуру обработки события "Нажатие кнопки" (Click) для элемента управления Command Button с именем Command1, можно использовать следующий код (CM представляет собой объект типа CodeModule):

TextLocation = CM.CreateEventProc("Нажатие кнопки", "Command1")

Метод CreateEventProc возвращает строку, с которой начинается основная часть процедуры обработки события. CreateEventProc не сработает, если аргументы относятся к несуществующему событию.

Пример
В данном примере метод CreateEventProc используется для создания процедуры Button_Click.

Debug.Print Application.VBE.SelectVBComponents.CodeModule.CreateEventProc("Нажмите ", "кнопку ")
Hosted by uCoz