Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Separar Cadenas

Estas en el tema de Separar Cadenas en el foro de Visual Basic clásico en Foros del Web. Hola que tal, les pido su ayuda para resolver este problema: tengo una caja de texto y quiero separar por cadenas lo que en ella ...
  #1 (permalink)  
Antiguo 18/03/2008, 11:04
 
Fecha de Ingreso: marzo-2008
Mensajes: 3
Antigüedad: 16 años, 1 mes
Puntos: 0
Busqueda Separar Cadenas

Hola que tal, les pido su ayuda para resolver este problema:

tengo una caja de texto y quiero separar por cadenas lo que en ella se encuentra por ejemplo "hola como estas"

resultado:

hola
como
estas

intente hacerlo con un for y unos arreglos pero solo me arroja caracter por caracter.
Nota: la caja de texto es multilineas y estoy trabajando en vb.net

agradecere su pronta respuesta, si me pudiesen enviar un correo a [email protected] se los agradeceria mucho
  #2 (permalink)  
Antiguo 18/03/2008, 11:11
Avatar de Laforge  
Fecha de Ingreso: noviembre-2004
Ubicación: Galaxia 34, Cuadrante 972, Área 31
Mensajes: 174
Antigüedad: 19 años, 6 meses
Puntos: 2
Re: Separar Cadenas

usa la función SPLIT con el espacio como identificador:

Cita:
Dim Palabras as variant
Palabras = Split(Textbox, " ")
En Palabras obtendrás una array con todas las palabras del texto que estén separadas entre ellas por un " " (espacio)

Saludos
__________________
Nunca esperes un mejor momento para abrir esa botella de vino...........nunca llega.

No hay vida después de MySQL
  #3 (permalink)  
Antiguo 18/03/2008, 11:37
Colaborador
 
Fecha de Ingreso: enero-2008
Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 16 años, 3 meses
Puntos: 37
Re: Separar Cadenas

En VB.NET no existe el tipo de dato Variant
  #4 (permalink)  
Antiguo 18/03/2008, 11:45
Avatar de seba123neo  
Fecha de Ingreso: febrero-2007
Ubicación: Esperanza, Santa Fe
Mensajes: 1.046
Antigüedad: 17 años, 2 meses
Puntos: 19
Re: Separar Cadenas

Hola,el codigo seria algo asi:

Código:
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim texto() As String = Split(TextBox1.Text, " ")
        Dim i As Integer
        For i = 0 To UBound(texto)
            MsgBox(texto(i))
        Next
    End Sub
End Class
saludos.
__________________
" Todos Somos Ignorantes; lo que pasa es que no todos ignoramos las mismas cosas " - Albert Einstein
  #5 (permalink)  
Antiguo 19/03/2008, 09:49
Avatar de Laforge  
Fecha de Ingreso: noviembre-2004
Ubicación: Galaxia 34, Cuadrante 972, Área 31
Mensajes: 174
Antigüedad: 19 años, 6 meses
Puntos: 2
Re: Separar Cadenas

... como dicen los franceses ..... voilá !!
__________________
Nunca esperes un mejor momento para abrir esa botella de vino...........nunca llega.

No hay vida después de MySQL
  #6 (permalink)  
Antiguo 23/03/2008, 23:33
 
Fecha de Ingreso: marzo-2008
Mensajes: 3
Antigüedad: 16 años, 1 mes
Puntos: 0
De acuerdo Re: Separar Cadenas

muchas gracias a todos los que me proporcionaron un poco de sus conocimientos. me fue d mucha ayuda sus sugerencias.. gracias
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta

SíEste tema le ha gustado a 1 personas (incluyéndote)




La zona horaria es GMT -6. Ahora son las 17:44.