Foro de elhacker.net

Programación => .NET (C#, VB.NET, ASP) => Mensaje iniciado por: TheGhost(Z) en 23 Diciembre 2010, 19:43 pm



Título: Invocar Procedimientos
Publicado por: TheGhost(Z) en 23 Diciembre 2010, 19:43 pm
Hola, vengo de VB6.0 quería saber la equivalencia de:


Código:
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..
Código:
 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...


Título: Re: Invocar Procedimientos
Publicado por: [D4N93R] en 23 Diciembre 2010, 20:24 pm
Hola,

El call no es necesario.  y si pudieses poner el erro que te da sería de gran ayuda.

Un saludo


Título: Re: Invocar Procedimientos
Publicado por: TheGhost(Z) en 23 Diciembre 2010, 20:33 pm
Código:
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


Código:
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


Título: Re: Invocar Procedimientos
Publicado por: [D4N93R] en 24 Diciembre 2010, 00:36 am
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.


Título: Re: Invocar Procedimientos
Publicado por: .:Weeds:. en 24 Diciembre 2010, 10:28 am
No es más facil hacer esto?

Código
  1. Private function hi() ' Creas la funcion
  2. Msgbox("HI")
  3. End function
  4.  
  5. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  6. hi() ' Llamas la funcion
  7. End Sub
  8.  

Saludos.


Título: Re: Invocar Procedimientos
Publicado por: TheGhost(Z) en 27 Diciembre 2010, 15:08 pm
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

Código:
Button2_Click(Me, EventArgs.Empty)

Saludos,