Ver Mensaje Individual
  #5 (permalink)  
Antiguo 12/03/2009, 21:15
Avatar de David
David
Moderador
 
Fecha de Ingreso: abril-2005
Ubicación: In this planet
Mensajes: 15.720
Antigüedad: 19 años, 1 mes
Puntos: 839
Respuesta: Anular redondeo

Una forma algo chapucera sería tratarlo como una cadena y cortar directamente la parte decimal, algo como esto:
Código vb:
Ver original
  1. Valor = 237.067
  2. Valor = Val(Fix(Valor) & "." & Left(Split(CStr(Valor), ",")(1), 2))
  3. MsgBox Valor
__________________
Por favor, antes de preguntar, revisa la Guía para realizar preguntas.