[Resolvido]Operação com conteúdo em textbox

Olá amigos!

Procurei algo mais simples para resolver esse caso mas nada que me atendesse, por isso peço a ajuda de vocês.

Tenho uma rotina de busca de cep que as vezes me traz alguns resultados inesperados, como por exemplo o endereço abaixo:

Rua: Rua Antonio Mendes Canale %28Pioneiros%29
Bairro: Pioneiros%A0

Vejam o correto:

Rua: Rua Antonio Mendes Canale
Bairro: Pioneiros

Notem que o conteúdo antes do caracter "%" fica correto, pretendo criar uma função para corrigir quando houver esses casos.
Em resumo gostaria que o VBA apagasse todo o conteúdo a partir do caracter "%".

Agradeço de antemão quem puder dar uma força!

ola,
Tente assim

Código:

dim a as string
a="Rua: Rua Antonio Mendes Canale %28Pioneiros%29"
a=Left(a, InStr(a, "%") - 1)
msgbox(a)


Perfeito cpampas!

Muito obrigado.

Aproveito para disponibilizar para os senhores uma rotina que na minha opinião, a mais rápida para busca de CEP através do access.
Ele utiliza o server da republica virtual.
Quem quiser dar mais uma "perfumada" da pra inserir rotinas pra verificar conexão com a internet e por aí vai...

Espero que seja útil está bem simples.

Abraços!