• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Gramas

[Resolvido] Espaços

3 mensagens neste tópico

Boa Tarde

tenho uma string do tipo "aaa aaa,    aaa   , aaaa   ,  aaaaaa, aaaa aaaa".

Gostaria de saber se existe alguma forma de se tirar os espaços dessa string de modo a ela ficar do tipo "aaa aaa,aaa,aaaa,aaaaaa,aaaa aaaa".

Ou seja retirar so os espaços entre as virgulas e as letras. ja tentei assim:

Dim texto As String = TextBox1.Text.Trim

        texto = texto.Replace(" ", String.Empty)

        Dim matriz() As String

        matriz = texto.Split(",")

Mas ela retirame o espaço entre o aaa aaaa também.

Desde já obrigado

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Public Function Limpa(ByVal x As String) As String
        Dim r As String() = x.Split(","c)
        x = ""
        For Each aux As String In r 
               x &= aux.Trim() & "," 
        Next
        Return x.Substring(0, x.Length - 1)
End Function

Parece-me que isto faz o que queres.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora