Como remover decimais no Visual Basic

Dígitos redondos para o número mais próximo em VB.

Passo 1

Inicie o programa Microsoft Visual Basic Express e clique em "Novo projeto" na guia "Página inicial". Clique em "Visual Basic" em "Modelos instalados" e clique duas vezes em "Application Console" para criar um novo projeto de console.

Passo 2

Copie e cole o código em "Abaixo de Main ()" para remover os decimais de uma variável flutuante:

Dim noDecNum As Double Dim DecimalNum As Long

decimalNum = 2233254.556 noDecNum = Int (decimalNum)

MsgBox (noDecNum)

Passo 3

Pressione "F5" para iniciar seu programa e enviar uma caixa de mensagem será exibida com o número sem os decimais.