**Public Function ArabicDigitToRoman( _
ByVal vDigit As Variant _
, ByVal vPowerOfTen As Variant _
) As Variant**

**Returns an individual Roman numeral digit. **

Returns the Roman numeral which represents the number vDigit * 10 ^ vPowerOfTen.

**Examples:** ArabicDigitToRoman(1, 0) = "I"
ArabicDigitToRoman(3, 0) = "III"
ArabicDigitToRoman(6, 0) = "VI"

**See also:** ArabicToRoman Function
RomanToArabic Function
ROMAN Function (Microsoft Excel)

**Note:** In the Roman numeral system, a line across the top of the letter means multiply by 1,000. Since there is no standard computer character for these Roman numerals, this function returns the lower-case version of the character. Upper-case letters have the standard translations (i.e. I = 1, V = 5, X = 10, etc.) and lower-case letters represent the corresponding value times 1,000 (i.e. v = 5,000, x = 10,000, etc.). Any Roman number greater than or equal to 4,000 will contain at least one of these lower-case letters. **vDigit:** Value of the specific digit for which the Roman numeral equivalent will be returned. Function returns Null if vDigit is Null or cannot be fixed up to a number.

Function returns Null if vDigit is not between 0 and 9.

**vPowerOfTen:** Power of ten times which vDigit is multiplied. Also, the position - 1 of the digit within the Arabic number when counting from the end.

Function returns Null if vPowerOfTen is not between 0 and 6.

Copyright 1996-1999 Entisoft

Entisoft Tools is a trademark of Entisoft.