StrComp関数

文字列比較の結果を示す値を戻します

構文

StrComp(string1, string2[, compare])

引数:

  • string1: 必須。有効な文字列式。
  • string2: 必須。有効な文字列式。
  • Compare: オプション。文字列の評価時に使用する比較の種類を示す数値。省略すると、バイナリ比較が実行されます。値については「設定」の項を参照してください。
  • 設定: 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