文字列：２つの文字列を比較する（StrComp 関数）
StrComp 関数の使い方
【書式】
result = StrComp ( string1, string2, [ compare ] )
引数・戻り値
- string1,string2 ・・・ 任意の文字列・文字列式を指定します。
- compare ・・・ 文字列の比較モード（-1,0,1）を指定します。省略時は、「Option Compare ステートメント」の設定により比較モードが決まります。
値 定数 内容 -1 vbUseCompareOption Option Compare ステートメントの設定を使用して比較 0 vbBinaryCompare バイナリモードの比較 1 vbTextCompare テキストモードの比較（大文字・小文字を同一視） 2 vbDatabaseCompare Microsoft Access の場合のみ有効
- result ・・・ 文字列を比較し結果に応じて（-1,0,1,Null 値）のいずれかを返します。文字の大小関係は基本的には、ASCIIコード・JISコードの大小となります。ただし、テキストモードでは、「大文字・小文字」、「全角・半角」、「かたかな・ひらがな」はいずれも同一とみなされます。
戻り値 内容 -1 string1 は string2 未満 0 string1 と string2 は等しい 1 string1 は string2 を超える Null 値 string1 または string2 が Null 値
StrComp 関数 の使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 |
Sub Sample_StrComp() Debug.Print StrComp("abc", "123", 0) 'バイナリモードで比較（1） Debug.Print StrComp("Hello!", "Hi!", 1) 'バイナリモードで比較（-1） Debug.Print StrComp("abc", "ABC", 0) 'バイナリモードで比較（1） Debug.Print StrComp("abc", "ABC", 1) 'テキストモードで比較（0） Debug.Print StrComp("あいうえお", "ｱｲｳｴｵ", 1) 'テキストモードで比較（0） End Sub |
実行結果
関連記事
-
-
引数が省略されたかどうかをチェックする（ IsMissing 関数 ）
IsMissing 関数の使い方 【書式】 result = IsMissing …
-
-
データをクリアする（ClearContents メソッド）
ClearContents メソッド 対象がセル範囲（Range オブジェクト） …
-
-
VBA で正規表現を使う（RegExp オブジェクト）
RegExp オブジェクト VBA で正規表現を使うには、VBScript のR …
-
-
Join 関数（配列の要素を結合）
Join 関数 1次元配列の各要素を指定した区切り文字で連結します。 【書式】 …
-
-
指定したセル範囲のサイズを変更（Resize プロパティ）
Resize プロパティ 指定したセル範囲のサイズ（行数や列数）を変更します。 …
-
-
ある数値が、複数の範囲のどの範囲に含まれるかを示す文字列を返す（Partition 関数）
Partition 関数 の使い方 Partition 関数は、ある数値が、区切 …
-
-
VBA で正規表現を使う（RegExp オブジェクトのプロパティ）
RegExp オブジェクトのプロパティ RegExp オブジェクトの詳細に関して …
-
-
四捨五入・切り上げ・切り捨て・丸め（Round 関数 他）
Round 関数（丸め）の使い方 【書式】 value = Round ( ex …
-
-
列挙型変数（Enum ステートメント）
列挙型変数を使う 列挙型変数を使用するには、Enum ステートメントを使って、宣 …
-
-
日付時刻：数値から日付・時刻データを取得（ DateSerial 関数、TimeSerial 関数 ）
DateSerial 関数（数値を使って日付データを取得） 【書式】 date …
Comment
戻り値の意味が分かりません
未満ってなんですか
超えるってなんですか
含有とは違うのですか
文字の大小関係は、文字コードでの大小となります。
たとえば「c」と「a」を比べると以下のようになります。
result = StrComp(“c”, “a”)
この時、ASCII コードで、”c” は、99 、”a” は 97 となります
つまり、”c” > “a” となるので、result は、1 となります。