#navi(../)
* VBScriptで10進数を16進数に変換する・Hex [#bd11bd5a]
VBScriptのHex関数を利用すると10進数を16進数に変換することができます。~
以下にスクリプトのサンプルコードと実行例などを記します。
#contents
#htmlinsertpcsp(win-top.html,win-sp.html)
* 関連記事 [#o6c5f02f]
-[[文字から文字コード・文字コードから文字を返却する関数・Asc・Chr>WSH/文字から文字コード・文字コードから文字を返却する関数・Asc・Chr]]
-[[16進数文字列を10進数に変換する・&H, Execute>WSH/16進数を10進数に変換する16進数文字列を10進数に変換する・&H, Execute]]
* Hex関数のサンプルコード [#ua001b89]
以下にHex関数を使ったサンプルコードを記します。~
#ref(Dec2Hex.zip)
Dim n1, n2, n3, h1, h2, h3
n1 = 15
h1 = Hex(n1)
WScript.Echo n1 & "(Dec) = " & h1 & "(Hex)"
n2 = 255
h2 = Hex(n2)
WScript.Echo n2 & "(Dec) = " & h2 & "(Hex)"
n3 = 4095
h3 = Hex(n3)
WScript.Echo n3 & "(Dec) = " & h3 & "(Hex)"
* サンプルコード実行結果 [#vf3c5be0]
以下に上記のHex関数を使用したサンプルコードの実行結果を記します。
** cscriptを使用してVBスクリプトを実行 [#ae08278a]
cscriptコマンドを使用してコマンドプロンプト上で上記のHex関数を使用したVBScriptを実行した出力結果です。
C:\Users\sakura\Desktop>cscript Dec2Hex.vbs
Microsoft (R) Windows Script Host Version 5.8
Copyright (C) Microsoft Corporation 1996-2001. All rights reserved.
15(Dec) = F(Hex)
255(Dec) = FF(Hex)
4095(Dec) = FFF(Hex)
** ダブルクリックでVBスクリプトを実行 [#x725c908]
上記のHex関数を使用したVBScriptをダブルクリックで起動したときの出力結果です。
#ref(01.gif)
#br
#ref(02.gif)
#br
#ref(03.gif)
以上、VBScriptでHex関数を使用し10進数を16進数に変換するサンプルコードでした。
#htmlinsertpcsp(win-btm.html,win-sp.html)