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.