SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => VBA => Mensaje iniciado por: slowogeid en Martes 13 de Abril de 2010, 07:36

Título: Redondeo Especifico Visual Basic 08 o 6
Publicado por: slowogeid en Martes 13 de Abril de 2010, 07:36
Necesito hacer redondeo de decimales de la siguiente forma:

Si es mayor o igual a 0 y menor o igual a 4, entonces no aumenta el siguiente numero.

Ej.       7.5674    =   7.567

Si es mayor o igual a 6 y menor o igual a 9, entonces aumenta el siguiente numero.

Ej.        7.567   =   7.57

Y si el numero es igual a 5 entonces, si el siguiente numero es par aumenta y si es impar no aumenta.

Ej1.      5.45    =    5.5  ------------> como el 4 es  numero Par por lo tanto aumento

Ej2.      5.5      =    5     ------------> como el 5 es impar por lo tanto no aumenta.

Al igual que necesito el poder controlar a cuantos decimales quiero reducir o si quiero llegar hasta el entero.

Por su atencion muchas gracias.