文字列比較の結果を示す値を戻します
構文
StrComp(string1, string2[, compare])
引数:
表11-21 比較定数および説明
| 定数 | 値 | 説明 |
|---|---|---|
vbBinaryCompare |
0 | バイナリ比較を実行します |
vbTextCompare |
1 | テキスト比較を実行します |
戻り値
StrComp関数には、次の戻り値があります:
表11-22 StrComp関数の戻り値
| 次の場合 | StrCompの戻り値 |
|---|---|
| string1がstring2より小さい | -1 |
| string1がstring2と等しい | 0 |
| string1がstring2より大きい | 1 |
備考
次の例では、StrComp関数を使用して、文字列比較の結果を戻します。3番目の引数が1の場合は、テキスト比較が実行されます。3番目の引数が0または省略されている場合は、バイナリ比較が実行されます。3番目の引数を省略すると、システムのデフォルト比較が実行されます。
次の例では、StrComp関数の使用方法を示します:
例1:
Dim MyStr1, MyStr2, MyComp MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables. MyComp = StrComp(MyStr2, MyStr1) ' Output: 1 MyComp = StrComp(MyStr1, MyStr2, 1) ' Output: 0 MyComp = StrComp(MyStr1, MyStr2, 0) ' Output: -1
例2:
Dim MyStr1, MyStr2, MyComp MyStr1 = "ABCD" MyStr2 = "XYZ" MyComp = StrComp(MyStr1, MyStr2) ' Output: -1
例3:
Dim MyStr1, MyStr2, MyComp MyStr1 = "XYZ" MyStr2 = "ABCD" MyComp = StrComp(MyStr1, MyStr2) ' Output: 1