#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)

トップ   編集 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS