- 追加された行はこの色です。
- 削除された行はこの色です。
#navi(../)
* VBScriptで16進数文字列を10進数に変換する・&H, Execute [#j8c5c4c7]
VBScriptで文字列で構成された16進数を10進数に変換する方法を以下に記します。~
使用した関数はExecuteで、16進数を示す&Hの両方を使用して実現してます。
#contents
#htmlinsertpcsp(win-top.html,win-sp.html)
* 関連記事 [#t47163e6]
-[[VBScriptで10進数を16進数に変換する・Hex>WSH/10進数を16進数に変換する・Hex]]
* 16進数文字列を10進数に変換するサンプルコード [#k3264dce]
以下のVBScriptサンプルコードは16進数文字列を10進数に変換します。~
Execute関数に、文字列で構成した命令文を渡し実行しています。
#ref(Hex2Dec.zip)
Dim n1, n2, n3, h1, h2, h3
h1="F"
h2="FF"
h3="FFF"
Execute ("n1 = &H" & h1)
WScript.Echo h1 & "(Hex) = " & n1 & "(Dec)"
Execute ("n2 = &H" & h2)
WScript.Echo h2 & "(Hex) = " & n2 & "(Dec)"
Execute ("n3 = &H" & h3)
WScript.Echo h3 & "(Hex) = " & n3 & "(Dec)"
* サンプルコード実行結果 [#n9684bef]
以下に上記のHex関数を使用したサンプルコードの実行結果を記します。
** cscriptを使用して実行 [#cd893a19]
cscriptコマンドを使用してコマンドプロンプト上で上記のExecute関数を使用したVBScriptを実行した出力結果です。
C:\Users\sakura\Desktop>cscript Hex2Dec.vbs
Microsoft (R) Windows Script Host Version 5.8
Copyright (C) Microsoft Corporation 1996-2001. All rights reserved.
F(Hex) = 15(Dec)
FF(Hex) = 255(Dec)
FFF(Hex) = 4095(Dec)
** ダブルクリックで実行 [#d19b0384]
上記のExecute関数を使用したVBScriptをダブルクリックで起動したときの出力結果です。
#ref(01.gif)
#br
#ref(02.gif)
#br
#ref(03.gif)
以上、VBScriptでExecute関数を使用し16進数を10進数に変換するサンプルコードでした。
#htmlinsertpcsp(win-btm.html,win-sp.html)