APAGAR ULTIMA LETRA DE UM TEXTO

MARIOZNETO 31/05/2007 15:15:37
#219142 Resposta escolhida

Veja se funciona

dim var as string
var="Qualquer coisa"
var=right(len(var-1),1)

Falow... T+

ALMARTI 31/05/2007 15:16:42
#219143

Há uma série de métodos, por exemplo:

Reescreva o texto sem o último caracter.

NovoTexto = MID(Text,1,len(Texto)-1)

ALMARTI 31/05/2007 15:17:48
#219144

O método do Mário é mais indicado.