Hola, vengo de VB6.0 quería saber la equivalencia de:
Private Sub Command1_Click()
Call Command2_Click
End Sub
Private Sub Command2_Click()
MsgBox "HI"
End Sub
Estoy intentando hacer lo mismo en VB.Net y tira error..
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Call Button2_Click()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
MsgBox("HI")
End Sub
ALguién sabe como hacer eso...
Saludos...
Hola,
El call no es necesario. y si pudieses poner el erro que te da sería de gran ayuda.
Un saludo
Error 1 No se ha especificado ningún argumento para el parámetro 'e' de 'Private Sub Button1_Click(sender As Object, e As System.EventArgs)'. C:\Documents and Settings\Pedro Luis\Configuración local\Datos de programa\Temporary Projects\WindowsApplication1\Form1.vb 8 9 WindowsApplication1
Error 2 No se ha especificado ningún argumento para el parámetro 'sender' de 'Private Sub Button1_Click(sender As Object, e As System.EventArgs)'. C:\Documents and Settings\Pedro Luis\Configuración local\Datos de programa\Temporary Projects\WindowsApplication1\Form1.vb 8 9 WindowsApplication1
Ahhh claro, no se por qué no lo ví.
Fíjate, este es el método que quieres llamar:
Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Tiene dos parámetros o argumentos. Tienes que pasarle algo ahí.
puedes hacer algo así:
Button2_Click(Me, EventArgs.Empty)
Y me dices como te fue.
No es más facil hacer esto?
Private function hi() ' Creas la funcion
Msgbox("HI")
End function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
hi() ' Llamas la funcion
End Sub
Saludos.
Gracias, [D4N93R]
Funcionó.. quería comentarte xq que hay que poner me y EventArgs.Empty y tambien si antes del me se debe poner ByVal o ByRef o simplemente me como me has dicho
Button2_Click(Me, EventArgs.Empty)
Saludos,