Mega Code Archive

 

Categories / VisualBasic Script / Math Functions

 

Displaying the integer part of a number

Sub GetIntegerPart()     Dim MyValue As Double     Dim IntValue As Integer     MyValue = 123.456     IntValue = Fix(MyValue)     MsgBox IntValue End Sub