Spanish LLAMAR SUB

JAVIERGARCIA

Member
Licensed User
Longtime User
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

Active Member
Licensed User
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:
B4X:
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.
 
Last edited:

figorra

Member
Licensed User
Longtime User
Creo que lo que buscas es algo más parecido a esto,
B4X:
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
 
Top