Olá, gostaría de saber como posso fazer para retirar espaços em branco de uma expressão. Pois estou desenvolvendo um programa para gerar um arquivo txt que não pode ter espaços em branco em sua linha.

Exemplo:

Tento este texto:             sTexto = "O mundo caminha dacordo com nossos ideais"

gostaria que ficasse assim: stexto = "Omundocaminhadacordocomnossosideais"

 

Já use as funções LTrim, Rtrim, Trim, porém estas funções não retirão os espaços internos das expressões.

 

Agradeço desde já a atenção.

 

 

 

 

 

 

For i = 1 to Len(TEXTO)

   if Mid(TEXTO,i,1) <> " " then  Resultado = Resultado & Mid(TEXTO,i,1)

Next

 

 

Oi Vilefort,

 

Vc pode usar o REPLACE(). Exemplo:

Agradeço pela ajuda.