Декларирование процедур обработки события эл. управления?

@fetis · Регистрация: 02.02.2009

Author24 — интернет-сервис помощи студентам

Создал программным путем эл. управления CommandButton, т.е. во время загрузки формы. Как теперь привязать к нему процедуру обработки события?

@Solovyov.Dmitry · 02.08.2009, 09:15

Что-то типа этого?:

Private WithEvents cmnObj As CommandButton

Private Sub cmnObj_Click()
MsgBox 'Событие!'
End Sub

Private Sub Form_Load()
Set cmnObj = Controls.Add('VB.CommandButton', 'cmnObj')
With cmnObj
.Visible = True
.Width = 2000
.Caption = 'Hello'
.Top = 1000
.Left = 1000
End With
End Sub

Удачи.

@fetis · 02.08.2009, 12:02 **[ТС]**

благодарю за помощь, как раз то, что я хотел воплотить

@fetis 0 / 0 / 0 Регистрация: 02.02.2009 Сообщений: 30
		1
	Декларирование процедур обработки события эл. управления? 01.08.2009, 00:03. Показов 862. Ответов 2 Метки нет (Все метки) Создал программным путем эл. управления CommandButton, т.е. во время загрузки формы. Как теперь привязать к нему процедуру обработки события? 0

@Solovyov.Dmitry 0 / 0 / 1 Регистрация: 21.07.2008 Сообщений: 120
	02.08.2009, 09:15	2
	Что-то типа этого?: Private WithEvents cmnObj As CommandButton Private Sub cmnObj_Click() MsgBox 'Событие!' End Sub Private Sub Form_Load() Set cmnObj = Controls.Add('VB.CommandButton', 'cmnObj') With cmnObj .Visible = True .Width = 2000 .Caption = 'Hello' .Top = 1000 .Left = 1000 End With End Sub Удачи. 0

@fetis 0 / 0 / 0 Регистрация: 02.02.2009 Сообщений: 30
	02.08.2009, 12:02 [ТС]	3
	благодарю за помощь, как раз то, что я хотел воплотить 0