<-- Previous || Up || Next -->

Arabic Digit To Roman Function
Math Miscellaneous Class

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.

    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.