Ver Mensaje Individual
  #1 (permalink)  
Antiguo 21/05/2007, 10:12
Avatar de Developer9
Developer9
(Desactivado)
 
Fecha de Ingreso: abril-2005
Ubicación: Mi Ecuador del alma
Mensajes: 4.196
Antigüedad: 19 años, 11 meses
Puntos: 47
Exclamación Lo que dice la ayuda sobre Redondear

Código:
Round Function
See Also
Int, Fix Functions

Requirements
Version 2 

Returns a number rounded to a specified number of decimal places.

Round(expression[, numdecimalplaces])
Arguments
expression 

Required. Numeric expression being rounded. 

numdecimalplaces 

Optional. Number indicating how many places to the right of the decimal are included in the rounding. If omitted, integers are returned by the Round function. 

Remarks
The Round function performs round to even, which is different from round to larger. The return value is the number closest to the value of expression, with the appropriate number of decimal places. If expression is exactly halfway between two possible rounded values, the function returns the possible rounded value whose rightmost digit is an even number. (In a round to larger function, a number that is halfway between two possible rounded values is always rounded to the larger number.)

Note   Round to even is a statistically more accurate rounding algorithm than round to larger.

Example
The following example uses the Round function to round a number to two decimal places: 

Dim MyVar, pi
pi = 3.14159
MyVar = Round(pi, 2) ' MyVar contains 3.14.
This example demonstrates how rounding to even works: 

Dim var1, var2, var3, var4, var5
var1 = Round(1.5)      ' var1 contains 2
var2 = Round(2.5)      ' var2 contains 2
var3 = Round(3.5)      ' var3 contains 4
var4 = Round(0.985, 2) ' var4 contains 0.98
var5 = Round(0.995, 2) ' var5 contains 1.00
el 0.985 no lo redondea a 0.99 pero el 0.995 si lo redondea a 1

entonces como hago para redondera 0.985 a 0.99?