関数 Hex関数16進数で表した文字列と逆変換

※より実装に近く表示させる為、コードの改行を避けています。スマホ等で閲覧される際は向きを変えてご覧ください。

※実装するバージョンによってはバージョンアップの仕様により動作しないコードもあります。実装には動作確認の上ご使用下さい。

10 進数の場合 16 進数の場合
000000 000000
000001 000001
000002 000002
000003 000003
000004 000004
000005 000005
000006 000006
000007 000007
000008 000008
000009 000009
000010 00000A
000011 00000B
000012 00000C
000013 00000D
000014 00000E
000015 00000F
000016 000010
000017 000011
000018 000012
・ ・
・ ・
16777215 FFFFFF
Option Explicit

Sub HexTest()
'***************************************
'Hex関数16進数で表した文字列と逆変換
'***************************************
Dim i As Byte
For i = 0 To 18
Debug.Print "[ " & Right("000000" & Hex(i), 6) & " ]"
Next i
Debug.Print "[ " & CLng("&H" & "000000") & " ]"
Debug.Print "[ " & CLng("&H" & "FFFFFF") & " ]"
'[ 000000 ]
'[ 000001 ]
'[ 000002 ]
'[ 000003 ]
'[ 000004 ]
'[ 000005 ]
'[ 000006 ]
'[ 000007 ]
'[ 000008 ]
'[ 000009 ]
'[ 00000A ]
'[ 00000B ]
'[ 00000C ]
'[ 00000D ]
'[ 00000E ]
'[ 00000F ]
'[ 000010 ]
'[ 000011 ]
'[ 000012 ]
'[ 0 ]
'[ 16777215 ]
End Sub

Hex 関数

指定した値を 16 進数で表した文字列型 (String) を返します。

  • 構文

  • Hex(number)

  • 引数 number には

    、任意の数式または文字列式を指定します。この引数は必ず指定します。

  • 解説

  • 引数 number が整数でない場合、変換の前に一番近い整数に丸められます。

  • number の値 戻り値

  • Null 値 Null 値
  • Empty 値 0
  • その他の数値 16 進数を表す最大 8 桁の文字列
  • 適切な範囲の数値の前に &H を付けて記述すると、値を直接 16 進数で記述することができます。
  • たとえば、10 進数の 16 を &H10 のように 16 進数で表記することができます。
  • はてなブックマークに追加

 

2016年10月01日|[VBサンプルコード]:[関数]