文字列：２つの文字列を比較する（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 |
実行結果
関連記事
-
-
配列の要素数を取得する（UBound 関数・LBound 関数）
UBound 関数・LBound 関数 【書式】 result = UBound …
-
-
セルのデータを区切り文字で複数のセルに分割する（TextToColumns メソッド）
TextToColumns メソッド TextToColumns メソッドを使用 …
-
-
VBA の演算子（比較演算子）
比較演算子 比較演算子による演算の結果は「真」の場合は「True」、「偽」の場合 …
-
-
日付時刻：日付から曜日を取得（ Weekday 関数、WeekdayName 関数 ）
Weekday 関数（日付から曜日を表す数値を返す）の使い方 【書式】 week …
-
-
日付時刻：時・分・秒を取得（Hour、Minute、Second 関数）
日付時刻から時・分・秒を取得する関数 【書式】 time_hour = Hour …
-
-
データ型変換関数
データ型変換関数の使い方 【書式】 function ( expression …
-
-
Option Compare ステートメント
Option Compare ステートメントの使い方 【書式】 Option C …
-
-
カレントフォルダ（CurDir 関数、ChDir ステートメント、ChDrive ステートメント）
カレントフォルダ カレントフォルダとは、ブックを開いたり保存するときに既定で参照 …
-
-
ショートカットメニュー（CommandBar オブジェクト）
ショートカットメニュー（コンテキストメニュー） 右クリックで表示されるメニューの …
-
-
指定した数のスペースを挿入する（Spc 関数）
指定した数のスペースを挿入 指定した数のスペースを挿入するには、Spc 関数を使 …
Comment
戻り値の意味が分かりません
未満ってなんですか
超えるってなんですか
含有とは違うのですか
文字の大小関係は、文字コードでの大小となります。
たとえば「c」と「a」を比べると以下のようになります。
result = StrComp(“c”, “a”)
この時、ASCII コードで、”c” は、99 、”a” は 97 となります
つまり、”c” > “a” となるので、result は、1 となります。