Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: yeikos en 9 Septiembre 2005, 17:33 pm



Título: Separación en cadenas
Publicado por: yeikos en 9 Septiembre 2005, 17:33 pm
Supongamos que tengo una cadena con el valor "primeracadena trece casa adolescente", ¿cómo podría despejar en esa misma cadena las 4 palabras que están separadas por espacios ( chr(32) ) ?


Título: Re: Separación en cadenas
Publicado por: Xpeed en 9 Septiembre 2005, 19:06 pm
lo puedes hacer cn las funciones instr() y mid() ... busca y lee de ellas, y podras separar la cadena de cuatro palabras en 4 cadenas de una palabra


un saludo.


Título: Re: Separación en cadenas
Publicado por: yeikos en 9 Septiembre 2005, 19:42 pm
La función Mid es la que he estado usando pero si te das cuenta no todas las palabras tienen la misma longitud, por eso quiero hacer que coja las palabras que haya entre signos especiales, en este caso: espacio.


Título: Re: Separación en cadenas
Publicado por: Xpeed en 9 Septiembre 2005, 19:55 pm
para eso es la funcion instr() , alli buscas los espacios y te devolvera dicha posicion, asi ya sabes de donde a donde va la primera palabra, luego vuelves a buscar desde la ultima posicion y así sucesivamente


un saludo.


Título: Re: Separación en cadenas
Publicado por: EstoyBaneado en 10 Septiembre 2005, 06:00 am
dim buf() as string
dim i as integer
buf = split("primeracadena trece casa adolescente", chr(32))
for i = 0 to ubound(buf)
msgbox buf(i)
next

 ;) Salu2.