InStr$ 関数の正しくない動作の対策として、コードの切れ端にhiraさんとSinryowさんによる
「[AB3] InStrの誤認識への対策」があります。
で、ここではもう 1 つの方法を投稿します。
コード: 全て選択
Declare Function StrStr Lib "shlwapi.dll" Alias "StrStrA" (lpFirst As BytePtr,lpSrch As BytePtr) As BytePtr
文字列の検索をする API です。
検索先の文字列と、検索する文字列へのポインタを引数にします。
コード: 全て選択
Dim A As BytePtr
A=StrStr("表","\")
こうしても 0 を返すので、正しく動作している様です。
shlwapi.dll は Windows 95 / NT の場合は Internet Explorer Version 4.0 以降がインストールされていないと存在しません。
それ以降の OS は最初から存在します。
速度等の検証はしていません。