Public Function IntegerPart( _
ByVal vNumber As Variant _
) As Variant IntegerPart(2.6) = 2
IntegerPart(2) = 2
IntegerPart(.4) = 0
IntegerPart(-.4) = 0
IntegerPart(-2.6) = -2
IntegerPart(-2.6E4) = -26000See also: IntegerPartVerify Subroutine
FractionalPart Function
Fix Function (Visual Basic)Note: The FractionalPart function returns the fractional part of a number. vNumber: The real number whose integer part is returned. Function returns Null if vNumber is Null or cannot be fixed up to a number.
Note: This function is similar to the Visual Basic Fix function, except that this one supports three-valued logic.
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.