----- Mensaje original -----

De: Alberto M. Vernieri

Para: DesarrolloVB@...

Enviado: lunes, 02 de febrero de 2009 12:27

Asunto: Re: [VB] Control de Usuario de Botones (Botonera)

Hola!

No uses el evento Click, ya que este es un evento que se hereda, y que responde a un click sobre cualquier parte de tu control (No necesariamente en alguno de los botones) Y toma precedencia sobre los clicks en los botones...

Usa otro evento con un nombre particular de tu control (Ejemplo "Navegacion"), y en el cmdNavegar_Click despues de setear las propiedades haces un Raise del evento Navegacion...

Y en el Form, detectas el evento Navegacion (usrBotonesNavegacion_Navegar)

Por otro lado, en tu código nunca haces Raise del evento Click... Por eso nunca se genera en el Form.

Espero que te sirva
--------------------------------------------------------
Alberto
"Writing about music is like dancing about architecture." - Frank Zappa

2009/2/2 Carlos Maradiaga <solinformat@yahoo.com>

Hola Alberto, gracias por tu colaboración. Probé lo me indicaste, y lo que tengo es lo siguiente: En el UserControl tengo :   'Para la Propiedad del ID de Boton Dim m_IDBoton As Integer   'Para el Evento Click ya que el control lo componen un Arreglo de 4 Botones. Event Click(Index As Integer)   ' Las asignaciones y lecturas de la Propiedad BotónClikeado: Public Property Get IdBotonClickeado() As Integer     IdBotonClickeado = m_IDBoton End Property Public Property Let IdBotonClickeado(iIDBoton As Integer)     m_IDBoton = IdBotonClickeado End Property 'En el Evento Click del arreglo de Botones. Private Sub cmdNavegar_Click(Index As Integer)     'Asigna a la Variable Global, el índice del Bóton donde se hizo Click.     m_IDBoton = Index     IdBotonClickeado = Index End Sub En el Formulario tengo lo Siguiente:   'En el Evento Click del User Control Private Sub usrBotonesNavegacion_Click(Index As Integer)     MsgBox "Boton Clickeado : " & usrBotonesNavegacion.IdBotonClickeado End Sub El problema es que el programa Nunca entre en el Evento Click del user control, por lo que nunca aparece el mensaje "Boton Clickeado "   Qué me hará falta ?   Muchas gracias de antemano a todos. Saludos.