[VBScript] StrComp関数

>Blog Top Page >[VBScript] Top Page >[VBScript] 関数 一覧

■構文
StrComp(string1, string2[, compare])

■説明
文字列の比較を行い結果を返します。
第一引数：比較対象の文字列を指定。
第二引数：比較対象の文字列を指定。
第三引数：(省略可能)文字列比較の比較モードを指定。省略時、Option Compareステートメントの設定にしたがいます。

定数	値	説明
vbUseCompareOption	-1	Option Compare ステートメントの設定を使用して比較を行います。
vbBinaryCompare	0	バイナリ モードの比較を行います。
vbTextCompare	1	テキスト モードの比較を行います。

戻り値

内容	戻り値
string1 は string2 より小さい	-1
string1 と string2 は等しい	0
string1 は string2 より大きい	1
String1 または string2 は Null 値	Null値

■サンプルコード

view plainprint?

1. Option Explicit  
2.   
3. 'AとBではAの方が先なので小さいになるはず  
4. Wscript.Echo StrComp("A", "B", vbBinaryCompare) '-1 (第一引数の方が小さい)  
5.   
6. '大文字と小文字では大文字の方が先なので小さいになるはず  
7. Wscript.Echo StrComp("A", "a", vbBinaryCompare) '-1 (第一引数の方が小さい)  
8.   
9. '大文字の方が先なので小さいという結果になるはず  
10. Wscript.Echo StrComp("B", "a", vbBinaryCompare) '-1  
11.   
12. 'テキストモードで大文字小文字を区別せず比較する  
13. Wscript.Echo StrComp("B", "a", vbTextCompare) ' 1  

Option Explicit

'AとBではAの方が先なので小さいになるはず
Wscript.Echo StrComp("A", "B", vbBinaryCompare) '-1 (第一引数の方が小さい)

'大文字と小文字では大文字の方が先なので小さいになるはず
Wscript.Echo StrComp("A", "a", vbBinaryCompare) '-1 (第一引数の方が小さい)

'大文字の方が先なので小さいという結果になるはず
Wscript.Echo StrComp("B", "a", vbBinaryCompare) '-1

'テキストモードで大文字小文字を区別せず比較する
Wscript.Echo StrComp("B", "a", vbTextCompare) ' 1

>Blog Top Page >[VBScript] Top Page >[VBScript] 関数 一覧