A unica coisa que mudou foi que ele ficou com uma virgula no fim. ---> 13.913.990,
No caso no text ele não aceita nem "," nem "." somente numeros ai na hora de exibir ele coloca no formato de moeda.
Mas o problema esta sendo quando depois da virgula o valor é diferente de ",00", ou seja quando o valor não é numero inteiro.
exemplo a pessoa vai digitar 123456 porque ela não consegue separar por pontos nem por virgula.
Ai no caso eu quero saber se tem como ele sempre por a "," antes dos 2 últimos digitados.
No caso do exemplo ficaria assim 1.234,56.
Ficou mais claro?
obrigado.
Seguinte galera a solução foi bem simples.
Entrei nas propriedades do Text e verifiquei que na propriedade DataFormat tinha a opção de Currency, e lá ele exibe um exemplo no Format$.
Utilizei o exemplo de format que ele exibiu e adaptei no código que ficou assim:
txtcusto.Text = Format(txtcusto.Text, "#,##0.00;(#,##0.00)") Funcionou direitinho. Obrigado a todos. Boa tarde a todos! Eu tentei esse último código, mas não consegui... alguma outra dica, o que deve estar fazendo de errado? Desde já, agradeço.