Cómo quitar decimales en Visual Basic

Redondea decimales al número más cercano en VB.
Por jaime avelar

Paso 1

Inicia el programa Microsoft Visual Basic Express y haz clic en "Proyecto Nuevo" en la pestaña "Página de inicio". Haz clic en "Visual Basic" debajo de "Plantillas instaladas" y haz doble cli en "Consola de aplicación" para crear un nuevo proyecto de consola.


Paso 2

Copia y pega el código bajo "Debajo principal ()" para quitar los decimales de una variable flotante:

Dim noDecNum As Double Dim decimalNum As Long

decimalNum = 2233254.556 noDecNum = Int(decimalNum)

MsgBox(noDecNum)


Paso 3

Presiona "F5" para iniciar tu programa y enviar un cuadro de mensaje se mostrará con el número sin los decimales.

Referencias