Option Compare ステートメントの使い方
【書式】
Option Compare { Binary | Text | Database }
項目の説明
- Binary ・・・ バイナリ文字コード順によって並べ替え順序が決まります。Option Compare ステートメントの記述がない場合はこの Binary モードが使用されます。
- Text ・・・ 50音順による並べ替え順になります。ただし、大文字と小文字、文字幅、カタカナとひらがなは区別しません。
- Database ・・・ Microsoft Access でのみ使用できます。
Option Compare ステートメントは、文字列データの既定の比較方法を設定します。
宣言セクション内（モジュールの先頭部分）に記述し、モジュールレベルで使用します。
Option Compare ステートメントの使用例
サンプルVBAソース（Text モード）
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
Option Compare Text Sub sample_option_compare_text() MsgBox """a""=""A"" ： " & IIf("a" = "A", True, False) & Chr(13) & _ """*""=""＊"" ： " & IIf("*" = "＊", True, False) & Chr(13) & _ """５""=""5"" ： " & IIf("*" = "＊", True, False) & Chr(13) & _ """？""=""?"" ： " & IIf("*" = "＊", True, False) & Chr(13) & _ """ア""=""あ""： " & IIf("ア" = "ｱ", True, False) & Chr(13) & _ """ア""=""ｱ"" ： " & IIf("ア" = "ｱ", True, False) End Sub |
実行結果
サンプルVBAソース（Binary モード）
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
Option Compare Binary '「規定値」なのでなくても同じ Sub sample_option_compare_text() MsgBox """a""=""A"" ： " & IIf("a" = "A", True, False) & Chr(13) & _ """*""=""＊"" ： " & IIf("*" = "＊", True, False) & Chr(13) & _ """５""=""5"" ： " & IIf("*" = "＊", True, False) & Chr(13) & _ """？""=""?"" ： " & IIf("*" = "＊", True, False) & Chr(13) & _ """ア""=""あ""： " & IIf("ア" = "ｱ", True, False) & Chr(13) & _ """ア""=""ｱ"" ： " & IIf("ア" = "ｱ", True, False) End Sub |
実行結果
