Public Function NumberAndSuffix( _
ByVal vValue As Variant _
) As Variant NumberAndSuffic(1) = "1st"
NumberAndSuffic(2) = "2nd"
NumberAndSuffic(13) = "13th"
NumberAndSuffic(42) = "42nd"
NumberAndSuffix(45) = "45th"See also: NumberSuffix Function
Spellings Class
NumberAndSuffixSample SubroutinevValue: Number that will be returned in string form along with the appropriate suffix. The suffix denotes the position of the item with this number within the list of items. Function returns Null if vValue is Null or cannot be fixed up to a number. Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.