「VBScript」StrComp関数で文字列比較を判定するサンプル

説明
StrComp(string1, string2[, compare])
strString1 は strString2 未満 -1
strString1 と strString2 は等しい 0
strString1 は strString2 を超える 1
strString1 または strString2 は Null 値 Null 値
使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
Dim cftStr1, cftStr2, resComp
cftStr1 = "ARKGAME"
cftStr2 = "arkgame"
resComp = StrComp(cftStr1, cftStr2, 1)
Wscript.Echo "result1 value: " & resComp
resComp = StrComp(cftStr1, cftStr2, 0)
Wscript.Echo "result2 value: " & resComp
resComp = StrComp(cftStr2, cftStr1)
Wscript.Echo "result3 value: " & resComp
Dim cftStr1, cftStr2, resComp cftStr1 = "ARKGAME" cftStr2 = "arkgame" resComp = StrComp(cftStr1, cftStr2, 1) Wscript.Echo "result1 value: " & resComp resComp = StrComp(cftStr1, cftStr2, 0) Wscript.Echo "result2 value: " & resComp resComp = StrComp(cftStr2, cftStr1) Wscript.Echo "result3 value: " & resComp
Dim cftStr1, cftStr2, resComp
cftStr1 = "ARKGAME"
cftStr2 = "arkgame"
resComp = StrComp(cftStr1, cftStr2, 1)
Wscript.Echo "result1 value: " & resComp
resComp = StrComp(cftStr1, cftStr2, 0)
Wscript.Echo "result2 value: " & resComp
resComp = StrComp(cftStr2, cftStr1)
Wscript.Echo "result3 value: " & resComp

実行結果
result1 value: 0
result2 value: -1
result3 value: 1

VBScript

Posted by arkgame