Olá PessoALL,

 

Gostaria de saber como o vb compreende uma quebra de linha.

 

No HTML: <br>
No PHP: ;

Como seria no VB?

 

O quero fazer é eliminar as quebras de linhas digitadas icorretamentes na string.

O vb tem as constantes q identificam o CARRIAGE RETURN (vbCR), o LINE FEED (vbLF) e a quebra de linha com retorno de carro (vbCRLF).

Vc pode usar uma função semelhante a abaixo para procurar ocorrencias de uma quebra de linha na string:

ilPos = 1

ilNovaPos = InStr(ilPos, sua_string, vbCr)

 

Aqui vc procura a partir da posição 1 da sua_string a ocorrencia do retorno de carro.

Para procurar mais ocorrencias, incremente ilNovaPos + ilPos para continuar a procurar apartir da ultima posição.

 

Em caso de dúvidas, entre em contato.

Não funciou amigo.
usando uma dica fiz assim:

 

Function RetiraEspacos(Str As String) As String
Dim S As String
S = Str
ilPos = 1
While InStr(S, " ") > 0
   S = Replace(S, " ", "")
   ilPos = ilPos + 1
   S = InStr(ilPos, S, vbCr)
Wend
RetiraEspacos = S
End Function

 

O que ocorre é que a funcção tira os espaços em branco mas não retirar as linhas que são "Enters".

 

Exemplo errado:

*/

JSDH6SDY S8SD80

2J OWIEW SODIS

 

SDSDOOSDPSD   /*