Foros del Web » Programación para mayores de 30 ;) » Bases de Datos General »

Problema con el redondeo en access

Estas en el tema de Problema con el redondeo en access en el foro de Bases de Datos General en Foros del Web. Tengo creado un informe y dentro de la consulta de dicho informe tengo un campo añadido que no se almacena en la base de datos. ...
  #1 (permalink)  
Antiguo 31/03/2008, 05:37
 
Fecha de Ingreso: noviembre-2004
Mensajes: 223
Antigüedad: 20 años
Puntos: 0
Problema con el redondeo en access

Tengo creado un informe y dentro de la consulta de dicho informe tengo un campo añadido que no se almacena en la base de datos. Es un numero. Mi problema es que el numero me sale con 4 decimales y no se como poner en criterios la formula para poner 2 decimales.

Gracias
  #2 (permalink)  
Antiguo 31/03/2008, 06:10
Avatar de Taribo007  
Fecha de Ingreso: agosto-2007
Mensajes: 1.338
Antigüedad: 17 años, 3 meses
Puntos: 18
Re: Problema con el redondeo en access

Una opcion:

'************************************************* ************************************************** ********
'* función que redondea un valor pasado como argumento, con un número de decimales determinado
'* uso: Redondeo(dblValor,1)
'* ESH 30/07/00 18:30
'************************************************* ************************************************** ********
Public Function Redondeo(dblValor As Double, bytDecimales As Byte)
If Int(dblValor * 10 ^ bytDecimales + 0.5) > Int(dblValor * 10 ^ bytDecimales) Then
Redondeo = Int(dblValor * 10 ^ bytDecimales + 0.5) / 10 ^ bytDecimales
Else
Redondeo = Int(dblValor * 10 ^ bytDecimales) / 10 ^ bytDecimales
End If

End Function ' Redondeo

Un saludo
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 14:28.