Public Function Max2Variant( _
      ByVal vX As Variant _
    , ByVal vY As Variant _
    , Optional ByVal vCompare As Variant _
    ) As Variant    Max2Variant(23, 45) = 45
    Max2Variant(-12, 4) = 4
    Max2Variant(2%, 2#) = 2%
    Max2Variant(2#, 2%) = 2#
    Max2Variant("SA", "RO") = "SA"
    Max2Variant("SA", "ro") = "ro"
    Max2Variant("SA", "ro", vbTextCompare) = "SA"See also:     Max2VariantVerify Subroutine
    Max2Real Function
    Max3Variant Function
    Min2Variant Function
    Max2 FunctionvX: First of two values, the maximum of which will be returned. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.