Spanish LLAMAR SUB

[JAVIERGARCIA]

Hola,
Como podría llamar a un sub de este tipo desde otro sub,,, que recoja los valores obtenidos en aquel y sigo...?

sub uno

...aqui hago cosas....

call geocoder1....

msgbox nombre <---resultado , pues pepe

end sub






Sub Geocoder1_GeocodeDone(Results() As Address, Tag As Object)

nombre=pepe

END SUB



Muchas gracias,

o quizás no se puede?

 

[tomky]

Hola Javier.
Si se puede.
Llamas al nombre del sub desde el interior del otro pasándole unos parámetros (lo que va entre los paréntesis)
Por ejemplo y muy esquemático:

Sub primero
    Dim s As String
    Dim clv3 As CustomListView
    Dim i As Int

    haces cosas...
    s = "pepe"

    segundo(s, clv3.AsView.Width, 50dip, i)   'La llamada (colocada al final)
End sub

Sub segundo(Text As String, Width As Int, Height As Int, index As Int)
    Dim s2 As String
    ...
    s2 = Text   'El traspaso
    ...
    otras cosas a hacer...
End sub

Como ves, lo que hay en el interior de los 2 grupos de paréntesis está relacionado.
Saludos.

 

[figorra]

Creo que lo que buscas es algo más parecido a esto,

Sub primero
   Dim Devuelto as String

   Devuelto = Segundo (parametro1, parametro2, ....)

End sub

Sub Segundo (parametro1 as xxxx, parametro2 as xxxx, ......) as String

   segundo = parametro1 + parametro2.......

End sub

puedes asignar segundo directamente a una llamada de tipo msgbox, etc..... siempre que sean del mismo tipo de variable

Espero te sirva