MASCARA PARA MOEDA
tua variavel [Ô] i [Ô] é integer, onde vc passa o valor que vem do Bd acredito, e como vc falou no teu banco ta como double. e acredito que quando vc ta dando o replace no T, e depois montando o valor no text, que ai ta comendo o valor.
da uma verificada. senao amanha dou uma mexida com seu codigo aqui pra ver como fica
da uma verificada. senao amanha dou uma mexida com seu codigo aqui pra ver como fica
Cara desculpa mas nao entendi como sua logica funcionaria no meu caso?
Tentei mudar para long mas tb nao deu certo se vc poder dar uma olhada no meu codigo eu agraadeço porque tb nao to conseguindo inchergar o erro
Como está o tipo do campo?
Nos meus eu coloco tipo Number(8, 2), gravo com CCur(CAMPO.Text) e recupero com CAMPO.Text = FormatNumber(Recorset([Ô]CAMPO_TABELA[Ô]), 2)
Nos meus eu coloco tipo Number(8, 2), gravo com CCur(CAMPO.Text) e recupero com CAMPO.Text = FormatNumber(Recorset([Ô]CAMPO_TABELA[Ô]), 2)
garava só o numero no banco de dados
tipo 1.500,00
ce grava campovalor = 150000
e depois formata na chamada
format(campovalor,[Ô]###.###.##0,00[Ô])
tipo 1.500,00
ce grava campovalor = 150000
e depois formata na chamada
format(campovalor,[Ô]###.###.##0,00[Ô])
Meu amigo, a solução é mais simples, creio eu.
Me.txtValorUnitario = Format(TbMateriais![Vl_Base_Venda], [Ô]###,##0.00[Ô])
Inclua o CCur(valor) para converter o valor em Currency (moeda)
Me.txtValorUnitario = Format(CCur(TbMateriais![Vl_Base_Venda]), [Ô]###,##0.00[Ô])
Me.txtValorUnitario = Format(TbMateriais![Vl_Base_Venda], [Ô]###,##0.00[Ô])
Inclua o CCur(valor) para converter o valor em Currency (moeda)
Me.txtValorUnitario = Format(CCur(TbMateriais![Vl_Base_Venda]), [Ô]###,##0.00[Ô])
Tópico encerrado , respostas não são mais permitidas