Ver Mensaje Individual
  #3 (permalink)  
Antiguo 31/08/2011, 12:30
Avatar de thegodinez
thegodinez
 
Fecha de Ingreso: octubre-2010
Ubicación: Culiacán, Sinaloa
Mensajes: 54
Antigüedad: 13 años, 9 meses
Puntos: 5
Respuesta: Redondear un numero con fracción

Código:
        If (Val(TextBox.Text) <> 0) Then
            TextBox.Text = Val(TextBox.Text)- (Val(TextBox.Text)Mod 1) + 1
        End If
Tenemos una condicionante que evalua que el TextBox no tenga residuo al ser dividida entre 1, si tiene residuo es que tiene una parte fraccionaria y si eso sucede TextBox sera igual a TextBox menos el residuo que resulte de la división entre TextBox y 1, más 1.

Última edición por thegodinez; 31/08/2011 a las 12:41