Menu
  1. Accueil
  2. Trucos
  3. Programación
  4. Lenguajes
Gracias
1
Gracias

Unas palabras de agradecimiento nunca están de más.

VBA.VB6/.Net - función Round con redondeo hacia arriba o abajo

Última actualización: por Carlos Villagómez .


La función Round() no redondea bien para los números de la forma (2a + 0,5) x 10^-n (redondeados hacia abajo)
En cambio, los números de la forma (2a - 0,5) x 10^-n normalmente son bien redondeados hacia arriba.

Por ejemplo:

Round(0.15 , 1) = 0.2
Round(0.25 , 1) = 0.2
Round(0.35 , 1) = 0.4
Round(0.45 , 1) = 0.4

La función Redondeo que veremos a continuación no presenta este problema:

Redondeo(0.15 , 1) = 0.2
Redondeo(0.25 , 1) = 0.3
Redondeo(0.35 , 1) = 0.4
Redondeo(0.45 , 1) = 0.5 

Private Function Redondeo(ByVal Numero, ByVal Decimales)  
      Redondeo = Int(Numero * 10 ^ Decimales + 1 / 2) / 10 ^ Decimales  
End Function


Gracias
1
Gracias

Unas palabras de agradecimiento nunca están de más.

Haz una pregunta
Nuestros contenidos son redactados en colaboración con expertos del ámbito tecnológico bajo la dirección de Jean-François Pillou, fundador de CCM.net y director digital en el Grupo Figaro. CCM es un sitio de tecnología líder a nivel internacional y está disponible en 11 idiomas.
El documento « VBA.VB6/.Net - función Round con redondeo hacia arriba o abajo » se encuentra disponible bajo una licencia Creative Commons. Puedes copiarlo o modificarlo libremente. No olvides citar a CCM (es.ccm.net) como tu fuente de información.

0 Comentario