StrComp 関数は2つの文字列を比較し、その結果を整数値で返します。
StrComp関数の使用方法
構文
StrComp(String1, String2 [, Compare])
【戻り値】 バリアント型 (内部処理形式 String の Variant)
引数名 |
省略 |
説明 |
String1 |
× |
比較したい任意の文字列を指定します。
|
String2 |
× |
比較したい任意の文字列を指定します。
|
Compare |
○ |
文字列比較のモードを指定する整数値を設定します。
省略すると、Option Compare ステートメント
の設定により比較モードが決まります。
|
引数Compareに指定可能な定数
定数 |
値 |
説明 |
vbUseCompareOption |
-1 |
Option Compare ステートメントの設定を使用して比較を行います。
|
vbBinaryCompare |
0 |
バイナリ モードで比較を行います。
|
vbTextCompare |
1 |
テキスト モード(大文字/小文字、全角/半角 区別なし)で比較を行います。
|
StrComp 関数の戻り値
内容 |
戻り値 |
String1 は String2 未満 |
-1 |
String1 と String2 は等しい |
0 |
String1 は String2 を超える |
1 |
StrComp関数の使用例
文字列をテキストモード(大文字・小文字、全角・半角無視)で比較する例です。
Sub sample_ef02E_02()
Dim wStr1 As String
Dim wStr2 As String
wStr1 = "じたくでプログラミング"
wStr2 = "ジタクデプログラミング"
'テキストモードで比較
If StrComp(wStr1, wStr2, vbTextCompare) = 0 Then
Debug.Print "同じです。"
Else
Debug.Print "違います。"
End If
End Sub