Problema de función vb int

Función int: Devuelve la parte entera de un número. Por ejemplo:

Atenuar MiNúmero

MiNúmero = Int(99.8) 'Devuelve 99

MiNúmero = Int(-99.8) 'Devuelve -100

MiNúmero = Int(-99.2) 'Return -100

En su programa, cuando a = 5.8, a no se puede definir como Entero, se puede definir como Simple o Doble.

Pruebe el siguiente programa:

Private Sub Form_Click()

Dim a As Integer

a = 5.8

Imprimir a

End SubInt(a)

Resultado en ejecución, a = 6.