Vba-strcomp-function
提供:Dev Guides
VBA-strComp
StrComp関数は、指定された2つの文字列を比較した後に整数値を返します。 比較する入力文字列に基づいて、-1、0、または1の3つの値のいずれかを返すことができます。
- 文字列1 <文字列2の場合、StrCompは-1を返します
- 文字列1 =文字列2の場合、StrCompは0を返します
- 文字列1>文字列2の場合、StrCompは1を返します
構文
StrComp(string1,string2[,compare])
パラメータ説明
- String1 -必須パラメーター。 最初の文字列式。
- String2 -必須パラメーター。 2番目の文字列式。
- 比較-オプションのパラメーター。 使用する文字列比較を指定します。 次の値を取ることができます。
- 0 = vbBinaryCompare-バイナリ比較を実行します(デフォルト)
- 1 = vbTextCompare-テキスト比較を実行します
例
ボタンを追加し、次の関数を追加します。
Private Sub Constant_demo_Click()
Dim var1 as Variant
msgbox("Line 1 :" & StrComp("Microsoft","Microsoft"))
msgbox("Line 2 :" &StrComp("Microsoft","MICROSOFT"))
msgbox("Line 3 :" &StrComp("Microsoft","MiCrOsOfT"))
msgbox("Line 4 :" &StrComp("Microsoft","MiCrOsOfT",1))
msgbox("Line 5 :" &StrComp("Microsoft","MiCrOsOfT",0))
End Sub
上記の関数を実行すると、次の出力が生成されます。
Line 1 :0
Line 2 :1
Line 3 :1
Line 4 :0
Line 5 :1