|
Postada em 16/03/2006 11:44 hs
Estou usando o seguinte código para somar os registro da minha tabela. Dim total As Long, soma As Long contCotacao = contCotacao + 1 soma = Cotacao!Comissao total = total + soma txtValorTotalCotacoes.Text = total txtValorTotalCotacoes.Text = Format(txtValorTotalCotacoes.Text, "R$ " & "#,##0.00") Só que o problema é que no "txtValorTotalCotacoes.Text " esta aparecendo o Valor Arrendondado. Como faço para solucionar este problema?
|
|
|
|
|
|
|
Postada em 16/03/2006 12:07 hs
Voce quer truncar o número em duas casas decimais, ou mostrar o numero completo com várias casas decimais?
dsmn
|
|
|
LCRamos
|
GOIANIA GO - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 16/03/2006 12:46 hs
Dim total As Currency, soma As Currency contCotacao = contCotacao + 1 soma = Cotacao!Comissao total = total + soma txtValorTotalCotacoes.Text = total txtValorTotalCotacoes.Text = Format(txtValorTotalCotacoes.Text, "R$ " & "#,##0.00") vlu//
|
|
|
|
Postada em 21/03/2006 17:29 hs
mesmo assim não ta dando certo. Se eu tenho um valor de R$ 35,76 por exemplo ele arredonda pra R$ 36,00. Eu queria q ele não arredondasse o valor. Pode ser meu banco de dados ou alguma variavel que declarei errado? Integer ou Currency que devo usar?
|
|
|
|
Postada em 21/03/2006 19:09 hs
Mude a variavel para Currency, Long arredonda antes das casas decimais vlu//
|
|
|