FORMATAR TEXTBOX

RO.DRIGOSG 09/03/2005 17:11:22
#71978
E ai galera, blz!

O problema é o seguinte:

Tenho um campo chamado TxtCnpj, nele tem uma função com código verificador, ate ai tudo bem.
E esse codigo verificador não verifica esses caracteres ( . - / ). Então eu quero que depois que seja feita a verficação o text seja formatado da seguinte maneira

Ex: 67.959.015/0001-53

Desde já agradeço a todos!
ALMARTI 09/03/2005 17:18:05
#71980
Vai ter que usar MaskEditBox para formatar uma mascara
"##.###.###/####-##"
USUARIO.EXCLUIDOS 09/03/2005 18:42:20
#72020 Resposta escolhida
pode ser assim também, sem o uso de MASKEDITBOXES...

dim verificar as string
verificar = txtCnpj
verificar = replace(verificar,".","")  'tira o ponto da string
verificar = replace(verificar,"-","")  'tira o traço da string
verificar = replace(verificar,"/","")   'tira a bara da string

'pronto vc tem na string verificar o cnpj sem os pontos, traços e barras só 
'para verificar, ai vc pode enviar para a subrotina de verificação... sem problemas..
msgbox verificar

blz.... até mais!
ARCE 09/03/2005 18:57:36
#72024
O correto seria vc usar uma maskebox!
ALMARTI 09/03/2005 19:57:14
#72031
GERMANIR, o que o RO_DRIGOSG quer é o contrario, quer transformar 99999999999999 em 99.999.999/9999-99, por isto a sugestão da MaskEdBox com Máscara.
USUARIO.EXCLUIDOS 10/03/2005 01:14:06
#72052
Cara, você terá realmente que usar a maskeditbox, pois fica mais conveniente... se você não sabe usar a ferramenta, no próprio visual basic aperte "ctrl + t" para adicionar a ferramenta "Microsoft Mask Edit Control 6.0", após isso, insira a mesma como se fosse um textbox no seu formulário e edite a propriedade mask do objeto para ##.###.###/####-## para ficar no formato de CNPJ...

Para ter um melhor entendimento, o caracter "#" significa que no mesmo local entrará somente números, caso você queira utilizar o objeto para colocar também somente letras você pode usar o caracter "?" e "A" para letras ou números.


Atenciosamente, Renan
RO.DRIGOSG 10/03/2005 13:40:34
#72138
Obrigado a todos que tentaram me ajudar...

...Germanir,

Valeu cara, era isso mesmo.


Um abraço a todos!
Tópico encerrado , respostas não são mais permitidas
Voltar