CONVERSÃO DE HEXADECIMAL

MARCOSILVERIO 12/09/2016 11:58:23
#466777
Estou com dificuldade em converter o número abaixo :

Text1.Text = 23.255
Text2.Text = 23.258
Text3.Text = Text2.Text - Text1.Text

Como esta aparecendo para mim :
Text3.Text = 3.00000000000011E-03

Na calculadora o valor que deveria aparecer é 0,003 ... como faço para converter esse número ??
MARCELO.TREZE 12/09/2016 12:58:51
#466779
você tem que tratar os numeros com o tipo correto exemplo

Text1.Text = 23.255
Text2.Text = 23.258
Text3.Text = Format(CCur(Text2.Text) - CCur(Text1.Text), [Ô]00.000[Ô])




CCur = Convert to Currency (convert pra moeda)

o format faz com que o valor seja exibido com tres casas decimais
MARCOSILVERIO 12/09/2016 14:46:59
#466782
MARCELO-TREZE ,

Muito obrigado Marcelo ... deu certo ...

Estou com outro problema .... quando faço uma divisão por zero aparece um erro ... sabe resolver isso ??? Ou se o Textbox estiver vazio tambem aparece a mensagem de erro ...

Text3.Text = Text2.Text / Text1.Text

Sendo que Text2.Text = 0

Nesse caso aparece uma mensagem de erro
MARCELO.TREZE 12/09/2016 17:14:48
#466796
então colega você trata isto com um if


If (Text1.Text>0 And Text1.Text<>[Ô][Ô]) Or (Text2.Text>0 And Text2.Text<>[Ô][Ô]) Then

Text3.Text = Text2.Text / Text1.Text

End If
MARCOSILVERIO 12/09/2016 20:15:08
#466814
Legal .... funcionou mesmo !!! muito bom ... agradeço muito ....
MARCELO.TREZE 12/09/2016 22:12:25
#466826 Resposta escolhida
disponha nao esqueça de encerrar
Tópico encerrado , respostas não são mais permitidas
Voltar