Ayuda con Decimales
Publicado por Sergio Montoya (18 intervenciones) el 31/07/2012 16:38:02
Buen dia 
,
Hoy tengo el siguiente Problema, Resulta que tengo una variable que me arroja un dato por ejm 1.5, lo que necesito es que la variable me quede en 1, eliminar los decimales pero que no me redondee la cifra, ya he intentado lo siguiente
Dim aux As Decimal = 0
' aux = he
' aux = Format(he, "#0")
' he = Val(Format(he, "0"))
'aux = Int(he)-he
Pero todos los metodos me redondean la cifra
Ayuda Por Favor!!!
Gracias
,Hoy tengo el siguiente Problema, Resulta que tengo una variable que me arroja un dato por ejm 1.5, lo que necesito es que la variable me quede en 1, eliminar los decimales pero que no me redondee la cifra, ya he intentado lo siguiente
Dim aux As Decimal = 0
' aux = he
' aux = Format(he, "#0")
' he = Val(Format(he, "0"))
'aux = Int(he)-he
Pero todos los metodos me redondean la cifra
Ayuda Por Favor!!!
Gracias
Valora esta pregunta
0