Asociar Evento onclick a un button

[dtrujo]

Hola a todos:

Tengo una aplicación en la que me creo botones, de la siguiente manera:

dim boton1 as new button

y luego modifico las propiedades. Bien, eso es sencillo, pero quiero que cuando presione sobre este boton ejecute una función determinada, es decir, quiero asociarle a este boton el evento onclick y cuando este se de, se llame a una función.

Alguien me hecha una mano????

P.D=Tiene que ser desde código

GRacia

[ajspollo]

Hola no se mucho de VB pero en C# eso lo puedes hacer asi:

boton1.Click+=Boton1_Click;

Siendo Boton1_Click el metodo al que se llamara cuando se dispare el evento.

1Saludo

[alexeiiw]

AddHandler [objeto][evento], AddressOf [metodo que recibe los mismos parametros del boton]

Espero que te sirva.

Saludos...

[dtrujo]

Gracias a ambos, la solución de C# funciona y la de addhandler tambien gracias

[dtrujo]

Hola de nuevo:

lo que me acabais de decir funciona perfectamente. sin embargo tengo un problema:

tras pulsar un boton de mi pagina se me abre una tabla, en la que las cabeceras son los botones que me cree anteriormente, es decir les he asociado a estos botones un evento click, tal y como me dijisteis vosotros. sin embargo al estar dentro de una rutina a la que accedo al pulsar sobre un boton, este evento no tiene efecto ¿como puedo cambiar esto?????

el codgio es el siguiente:

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim BotonT As New Button 'creo el control linkbutton
AddHandler BotonT.Click, AddressOf BotonT_Click 'CON ESTO DIEGO HAGO EN ENLACE.
'utilizo addhandler para primero definir el evento que quiero capturar
'y despu‚s la subrutina que quiero ejecutar, prueba esto y creo que entender s como funciona.

BotonT.Text = "esto es una prueba para ver como creo algo y despu‚s capturo su evento"

Dim fila As New TableRow
Dim fila2 As New TableRow
Dim col As New TableCell
Dim col2 As New TableCell

col.Controls.Add(BotonT)
col2.Controls.Add(New LiteralControl("columna dos"))

fila.Cells.Add(col)
fila.Cells.Add(col2)

fila2.Cells.Add(col)
fila2.Cells.Add(col2)

Table1.Rows.Add(fila)
Table1.Rows.Add(fila2)

'form1.Controls.Add(BotonT)
'lo posiciono en la web para que se vea [/SIZE][/SIZE][/SIZE][/FONT][/COLOR]gracias