Public Function BaseXToNumber( _ ByVal vString As Variant _ , Optional ByVal vBase As Variant _ ) As Variant
BaseXToNumber("10101011101", 2) = 1373 BaseXToNumber("23", 8) = 19 BaseXToNumber("377", 8) = 255 BaseXToNumber("12345", 8) = 5349 BaseXToNumber("-3456", 8) = -1838 ' #5 BaseXToNumber("23", 16) = 35 BaseXToNumber("FFFF", 16) = 65535 BaseXToNumber("12345678", 16) = 305419896 BaseXToNumber("AZ", 36) = 395 BaseXToNumber("ABC", 36) = 13368 BaseXToNumber("12345678", 36) = 82906087076 BaseXToNumber("AZABCDE", 36) = 23901464930 BaseXToNumber("ABCDEFGHI", 36) = 29100036563766 BaseXToNumber("ABCDEFGHIJKL", 36) = 1.35769130591909E+18See also:
NumberToBaseX Function BaseXToLong FunctionSummary: This function can convert any numeric string whose base is between 2 and 36. Use base 2 for binary numbers, base 8 for octal numbers, base 10 for decimal numbers, base 16 for hexadecimal numbers, and base 36 for alphanumeric numbers. This function accepts negative numbers as indicated by a leading minus sign ("-") as in example #5.
vString: String containing the number in base vBase which will be converted to base 10 and returned as a Double value. Function returns Null if vString is Null or cannot be fixed up to a String.
vBase: The number base from which vString will be converted to base 10. vBase defaults to 10 (ten) if it is missing or Null or cannot be fixed up to a number. Function sets the base to 2 if vBase is less than 2.
Note: Function ignores characters in vString which are outside the range of those required to represent numbers of the specified base. For example, if the base if 2, this function will ignore all characters but "0" and "1" (and possibly a leading "-" which would indicate a negative number).
Copyright 1996-1999 Entisoft
Entisoft Tools is a trademark of Entisoft.