La Web del Programador: Comunidad de Programadores
 
    Pregunta:  57734 - PROBLEMAS CON EL ACCESS 97 Y EL REDONDEO
Autor:  marcos
Con el acces 97 no viene la funion round! como puedo hacer con esta version que un numero de 6 decimales pueda coger solo 2 para poder operar con otros datos?gracias

  Respuesta:  Jose Ignacio Alvarez Rodriguez
Por regla general el ningun access no tiene la virtud de redondear correctamente asi que que te recomendaria que usases esta funcion que va bastante bien....
Create un modulo y copias en el, este codigo

Function redondear(cantidad, decimales)
Dim Factor As Long
Factor = 10 ^ decimales
redondo = Int(cantidad * Factor + 0.5) / Factor
End Function

Donde {Cantidad} es el numero con decimales que quieres redondear y {decimales} es numeo de dicimales que quieres obtener

ejemplo: desde la [ventana de Inmediato]
? redondear(3.141592,4)
3.1416