文字列を含むかどうかの判定

InStr を使う

result = InStr([ start, ] string1, string2 [, compare ])

引数

引数 目的
start (省略可)検索開始位置。compare を指定した場合は省略不可。
string1 検索対象文字列
string2 検索条件文字列
compare (省略可)検索条件

引数 compare に入る値

定数名 default 動作
vbUserCompareOption -1 * OptionCompareステートメントの設定を使用して比較
vbBinaryCompare 0 バイナリモードで比較*1
vbTextCompare 1 テキストモードで比較*2
vbDatabaseCompare 2 Access DBの設定を使用して比較

戻り値

条件 結果
string1 中に string2 を見つけたとき string1 中の string2 の開始位置
string1 中に string2 が見つけられなかったとき 0
string1 = "" 0
string1 is Nothing Or string2 is Nothing NULL値
string2 = "" start (startを指定して無い場合は1)
start > Len(string1) 0
参照
http://www.geocities.jp/cbc_vbnet/function/mojireyu_function.html#instr

*1:大文字/小文字 半角/全角 ひらがな/カタカナをそれぞれ区別して比較

*2:大文字/小文字 半角/全角 ひらがな/カタカナをそれぞれ区別せずに比較