Holas
Necesito una función que dandole unafrase y un numero me devuelva una palabra completa que esta dentro de esa frase y cuyo primer caracter es, dentro de la frase, el que le digo con el numero.
Así que hago lo siguiente;

Public Function sacar_palabra(contexto As String, caracter As Integer)
palabra = ""
While Mid(contexto, caracter, 1) <> " "
palabra = palabra & Mid(contexto, caracter, 1)
caracter = caracter + 1
Wend
End Function

¿Como le digo que al llamar a la funcion lo que me debe devolver es "palabra"?
¿Como llamo a la funcion? Estaba usando algo tal que asi;

ppalabra=modulo.sacar_palabra(frase,6)

Venga muchas gracias.

hola debes de declarar tu funcion de manera que regrese un string


Public Function sacar_palabra(contexto As String, caracter As Integer) as String
dim palabra as String
palabra= ""
While Mid(contexto, caracter, 1) <> " "
palabra = palabra & Mid(contexto, caracter, 1)
caracter = caracter + 1
Wend

sacar_palabra=palabra ' Le asignas elString palabraa la funcion

End Function


Eso es todo espero que te sea util mi ayuda

y a la hora de llamar la funcion debes hacerlo como tu proponias

ppalabra=modulo.sacar_palabra(frase,6)

aunque no es necesario " mudulo. " simplemente con sacar_palabra(frase,6)