¿Como se hace para capturar los eventos de los controles un formulario que se crearon por código?
Estoy intentando capturar el evento producido por un ButtonBox que genero en un formulario mediante una clase de creación de controles pero no lo consigo.
Código de la clase que crea el control:
Public Sub _new(objControl As Object, strText As String, strType As String, Optional strTag As String, intNum As Integer, Optional strIcon As String, Optional stxComboList As String[])
Dim intLst As Integer
lbl1 = New Label(pnl1)
With lbl1
.Text = strText
.Width = 200
.Height = 24
End With
bto1 = New ButtonBox(pnl1) As "GButtonBox"
With bto1
.Width = 200
.Height = 24
.Name = "bto" & Str(intNum)
End With
End
Public Sub GButtonBox_Click()
Print "se ha clickeado el ButtonBox y el evento se capturó en la clase generatriz"
End
Dim intLst As Integer
lbl1 = New Label(pnl1)
With lbl1
.Text = strText
.Width = 200
.Height = 24
End With
bto1 = New ButtonBox(pnl1) As "GButtonBox"
With bto1
.Width = 200
.Height = 24
.Name = "bto" & Str(intNum)
End With
End
Public Sub GButtonBox_Click()
Print "se ha clickeado el ButtonBox y el evento se capturó en la clase generatriz"
End
En el formulario he intentado capturar el evento del click del ButtonBox de la siguiente manera:
Lo único que he obtenido es:
"se ha clickeado el ButtonBox y el evento se capturó en la clase generatriz"
Por lo tanto el evento no fue capturado en el formulario.