Cum se elimină zecimalele în Visual Basic

Semnale rotunde la cel mai apropiat număr din VB.

Pasul 1

Porniți programul Microsoft Visual Basic Express și faceți clic pe "New Project" în fila "Home page". Faceți clic pe "Visual Basic" sub "Șabloane instalate" și faceți dublu clic pe "Application Console" pentru a crea un nou proiect de consola.

Pasul 2

Copiați și inserați codul sub "Under Main ()" pentru a elimina zecimalele unei variabile care plutește:

Dim noDecNum Ca dimensiune dublă DecimalNum Atâta timp

decimalNum = 2233254.556 noDecNum = Int (decimalNum)

MsgBox (noDecNum)

Pasul 3

Apăsați "F5" pentru a porni programul și trimiteți o casetă de mesaje va fi afișată cu numărul fără zecimale.