• Lunes 23 de Diciembre de 2024, 01:06

Autor Tema:  Re: filtrar espacios.....  (Leído 1213 veces)

FEckEZ

  • Miembro activo
  • **
  • Mensajes: 46
    • Ver Perfil
Re: filtrar espacios.....
« en: Martes 21 de Enero de 2003, 17:05 »
0
bueno, como puedo filtrar el numero de espacios que hay en una cadena de texto... por ejemplo.. tengo la siguiente cadena:
"falta____de__imaginacion______en   este___momento"

que me devuelta: "falta de imaginacion en este momento"



parece que el foro filtra los espacios (jeje, justo lo que yo quiero hacer).. para que el ejemplo se entieda voy a colocar los espacios con _

javierbalk

  • Miembro MUY activo
  • ***
  • Mensajes: 142
  • Nacionalidad: 00
    • Ver Perfil
    • Print preview y grabar PDF en Visual Basic 6
Re: filtrar espacios.....
« Respuesta #1 en: Martes 21 de Enero de 2003, 18:58 »
0
Hola:

    Dim s As String
    Dim a
    Dim s2 As String
    Dim c As Long
   
    s = "falta     de  imaginacion      en este          momento"
    a = Split(s, " ")
   
    For c = 0 To UBound(a)
        If a(c) <> "" Then
            s2 = s2 & " " & a(c)
        End If
    Next
    MsgBox s2


Saludos,
Javier

FEckEZ

  • Miembro activo
  • **
  • Mensajes: 46
    • Ver Perfil
filtrar espacios.....
« Respuesta #2 en: Martes 21 de Enero de 2003, 20:39 »
0
gracias, me ha funcionado perfectamente el codigo...