Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: andrer03 en 14 Enero 2009, 21:28 pm

Título: ayuda con una calculadora
Publicado por: andrer03 en 14 Enero 2009, 21:28 pm

hola tengo echa un aclaculadora con este codigo

Citar

Private Sub Command1_Click()
Text3 = Val(Text1) / Val(Text2)
End Sub

lo que quiero es obtener el resultado solo con dos decimales ayuda por favor :D

Título: Re: ayuda con una calculadora
Publicado por: vivachapas en 14 Enero 2009, 21:36 pm

Código

Private Sub Command1_Click()
Text3 = Val(Text1) / Val(Text2)
Text3 = Round(Text3, 2)
End Sub

Título: Re: ayuda con una calculadora
Publicado por: ssccaann43 © en 14 Enero 2009, 22:53 pm

hola tengo echa un aclaculadora con este codigo

Citar

Private Sub Command1_Click()
Text3 = Val(Text1) / Val(Text2)
End Sub

lo que quiero es obtener el resultado solo con dos decimales ayuda por favor :D

Puedes hacerlo de varias maneras

Código

Private Sub Command1_Click()
Text3 = Round(Val(Text1) / Val(Text2),2)
End Sub

Código

Private Sub Command1_Click()
Text3 = FormatNumber(Val(Text1) / Val(Text2),2)
End Sub

Título: Re: ayuda con una calculadora
Publicado por: andrer03 en 16 Enero 2009, 16:38 pm

gracias por su ayuda es lo q buscaba gracias :)