Public Function Max3Variant( _
ByVal vValue1 As Variant _
, ByVal vValue2 As Variant _
, ByVal vValue3 As Variant _
, Optional ByVal vCompare As Variant _
) As Variant Max3Variant(23, 45, 56) = 56
Max3Variant(-12, 12, 4) = 12
Max3Variant(2%, 2#, 2!) = 2%
Max3Variant("SA", "RO", "EN") = "SA"
Max3Variant("SA", "ro", "EN") = "ro"
Max3Variant("SA", "ro", "EN", vbTextCompare) = "SA"See also: Max3VariantVerify Subroutine
Max3Real Function
Max2Variant Function
Min3Variant FunctionvValue1: First of three values, the maximum of which will be returned. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.