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