evento de pulsar un boton

26/05/2005 - 00:26 por Sonia | Informe spam

hola
tengo un formulario con 7 botones, pulse el q sea de ellos me tiene q salir
lo mismo: el mismo datagrid rellenado, pero la consulta para rellenar el
datagrid depende del boton q pulse.
es decir q siempre tiene q salir lo mismo, pero segun el boton q pulse deben
salir unas lineas u otras.
mi pregunta es, como se llama el evento de pulsar un determinado boton? es q
supongo q con eso podre usar el mismo procedimiento para todos los botones y
solo cambiar la linea mysql=

Siga el debate

7 respuestas

Tengo una respuesta

Preguntas similare

Como hacer q al pulsar el intro se active el evento click del boton??

Leer las respuestas

#6 Quetzal

27/05/2005 - 00:00 | Informe spam

que tal con un Handles

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles Button1.Click, Button2.Click, Button3.Click, _
Button4.Click, Button5.Click, Button6.Click, Button7.Click

Dim tuSQL As String

Select Case sender
Case Button1
tuSQL = "SQL correspondiente al primer boton"
Case Button2
tuSQL = "SQL correspondiente al segundo boton"
Case Button3
tuSQL = "SQL correspondiente al tercer boton"
Case Button4
tuSQL = "SQL correspondiente al cuarto boton"
Case Button5
tuSQL = "SQL correspondiente al quinto boton"
Case Button6
tuSQL = "SQL correspondiente al sexto boton"
Case Button7
tuSQL = "SQL correspondiente al septimo boton"
End Select

End Sub

Con el Handles puedes manejar el evento click de los 7 botones y con el
objeto "sender" averiguar especificamente que boton disparo el evento.

Responder a este mensaje

#7 Quetzal

27/05/2005 - 00:13 | Informe spam

Perdon. Modifico el codigo. De esta forma si funciona.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles Button1.Click, Button2.Click, Button3.Click, _
Button4.Click, Button5.Click, Button6.Click, Button7.Click

Dim tuSQL As String

Select Case sender.name
Case "Button1"
tuSQL = "SQL correspondiente al primer boton"
Case "Button2"
tuSQL = "SQL correspondiente al segundo boton"
Case "Button3"
tuSQL = "SQL correspondiente al tercer boton"
Case "Button4"
tuSQL = "SQL correspondiente al cuarto boton"
Case "Button5"
tuSQL = "SQL correspondiente al quinto boton"
Case "Button6"
tuSQL = "SQL correspondiente al sexto boton"
Case "Button7"
tuSQL = "SQL correspondiente al septimo boton"
End Select

End Sub

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2

Busqueda sugerida