Crear Eventos en tiempo de ejecucion

[samccp]

mmm... no se si entienda tu problema, pero para agregar eventos a un control (cualquiera) simplemente tienes que definir la rutina que quieres que realice y luego ponerle un handler al control, por ejemplo.
--> todo esto lo estoy haciendo "en el aire" no estoy en un equipo con el .net instalado <--
Dim Boton as Button

Sub Load()
Boton = new Button

addhandler boton.click addressof Click

End Sub

Sub Click(sender as object, e as eventargs)
Messagebox.show("Hola")
End Sub

--> es importante recalcar que para que funcione el handler, la rutina tiene que tener como parametros los mismos parametros que tiene la rutina normal del boton o el control...
por ejemplo, puedes poner un boton mendiante el arrastre de la barra de herramientas del mismo vb.net y si quieres digamos... el click derecho, puedes darle doble click al boton que creaste y buscar en sus eventos el evento MOUSEDOWN, se creara el bloque de codigo con los parametros que ocupas, supongamos que queda algo asi:

Private Sub Button1_MouseDown(Sender as object, e as mouseeventargs) handles button1.mousedown

end sub

ahora... lo que tienes que hacer es lo siguiente:

Private Sub PresionarMouse(Sender as object, e as mouseeventargs)

End Sub

si te das cuenta, renombre la rutina que el mismo vb.net te genera y le quite el handles, esto porque con la sentencia "Addhandler" lo vamos a controlar, es por eso que los parametros son necesarios, de lo contrario te marcara errores al intentar compilar...


espero haya sido de ayuda