Funcion que devuelve array de texto

[astut]

Hola a todos, pues lo que pretendo es saber si existe una funcion similar a la de explode() de php, es decir, en una variable string tengo el siguiente contenido: "hola desde valencia", y usando la funcion indicando que ignore los espacios, algo como:
array= explodevb(" ",$variable), me devolveria lo siguiente:
array[0]= "hola"
array[1]= "desde"
array[2]= "valencia"

¿Existe?, gracias!

[ReViJa]

Estoy tan inspirado que te he hecho un ejemplo, espero que te sirva:

Código:

Dim Key() As String, Cadena As String, x As Integer

Cadena = "Hola a todos los foreros"
Key = Split(Cadena)

For x = LBound(Key) To UBound(Key)
  Debug.Print Key(x)
Next

Saludos.

[astut]

Hola, parece que funciona, ¿pero me lo puedes explicar?, gracias

[ReViJa]

Sin problemas !!!


Cadena = "Hola a todos los foreros" => Variable que almacena la cadena, puede ser una variable, un TextBox u otro.

Key = Split(Cadena) => Aquí carga en el vector según la función Split por defecto el delimitador de cadena es " " (un espacio) pero eso lo puedes cambiar por lo que quieras.
EJ:
Cadena= "Hola mundo"
key=Split(cadena," ")
debug.print key(0)
debug.print key(1)

For x = LBound(Key) To UBound(Key)
Debug.Print Key(x)
Next => Con el bucle recorro desde el inicio del vector Lbound(key) hasta el final del vector Ubound(key) y con la x vector(x) lo recorres.

Si te confunde el Debug.Print cambialo por un TextBox.

Un saludo.

[astut]

Gracias una ultima pregunta, ¿por que el "Debug" delante del print?, gracias por tu aclaracion =)
EDIT: Tambien me dice que se esperaba una matriz cuando utilizo la variable que ha usado split:

Código:

Line Input #nfic, linea
    trozo = Split(linea, "     ")
    mapa_instancias(n) = trozo(2)

En la ultima linea me dice que trozo no es una matriz ("se esperaba una matriz"), ¿que he hecho mal?, saludos!

[ReViJa]

Hola, el Debug.Print muestra el resultado en la ventana 'Inmediato' si tienes visual abierto pulsa esta combinación Ctrl+g y veras la ventana.

Si no quieres poner los espacios así " " puedes usar Space(x) donde x son los espacios que tu quieras.

Mira las declaraciones y si no das con el error pon el code entero y le echamos un vistazo, ok.

PD: Edito por..

Código:

array[0]= "hola"
array[1]= "desde"
array[2]= "valencia"

JJEJEJEJEJEJ yo tambien soy de Valencia.

Saludos.

[astut]

Código:

For n = 0 To 119
    Line Input #nfic, linea
    trozo = Split(linea, "     ")
    mapa_instancias_tipo(n) = trozo(0)
    mapa_instancias(n) = trozo(1)
    mapa_instancias_argumento1(n) = trozo(2)
    mapa_instancias_argumento2(n) = trozo(3)
Next

Saludos desde valenciaxD

[astut]

¿Alguien podria responerme?, gracias ^^

PD: Bonitos botones

[GeoAvila]

en las faq's hay un ejemplo de como hacer lo que estas buscando busca detenidamente...

nos vemos..

[astut]

¡Bravo!, me has hecho recorrer 4 paginas para encontrar un ejemplo de la funcion split y si lo he encontrado, ¿me ha solucionado el problema?, la respuesta es no, se usar la funcion, pero si lees mas arriba veras que produce error y no se porque es, a ver si ahora me puedes ayudar, saludos

Iniciado por ASTUT

Gracias una ultima pregunta, ¿por que el "Debug" delante del print?, gracias por tu aclaracion =)
EDIT: Tambien me dice que se esperaba una matriz cuando utilizo la variable que ha usado split:
Código:

Line Input #nfic, linea
trozo = Split(linea, " ")
mapa_instancias(n) = trozo(2)

En la ultima linea me dice que trozo no es una matriz ("se esperaba una matriz"), ¿que he hecho mal?, saludos!

[astut]

Resuelto, tenia que definirla como array... lol gracias por todo