hexToDec

16進数を10進数に変換します。10進数を16進数に変換するにはdecToHex関数を使います。

構文
  1. Double = hexToDex( hex )
引数
hex
16進数
戻値
10進数に変換した値

プログラム

////////////////////////////////////////////////// // 【引数】 // hex : 16進数 // 【戻値】 // 10進数に変換した値 ////////////////////////////////////////////////// FUNCTION hexToDec(hex) dec = 0 hex = STRCONV(hex, SC_LOWERCASE) FOR n = 1 TO LENGTH(hex) str = COPY(hex, n, 1) IFB CHKNUM(str) THEN num = str ELSE num = ASC(str) - 87 ENDIF dec = dec + (num * POWER(16, LENGTH(hex) - n)) NEXT RESULT = dec FEND

この記事は役に立ちましたか?
役に立った 役に立たなかった