Public Function Mantissa( _
    ByVal vX As Variant _
    ) As Variant    Mantissa(1.23E4) = 1.23
    Mantissa(567000) = 5.67
    Mantissa(-78900) = 7.89
    Mantissa(.00123) = 1.23
    Mantissa(-.0123) = 1.23See also:     MantissaVerify Subroutine
    ExponentPart Function
    Sgn Function (Visual Basic)vX: The real number whose mantissa is returned. Function returns Null if vX is Null or cannot be fixed up to a number. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.