VB.NET で、InstrB に変わるもの？？ (ID:120553)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 現在、VB5にてあるファイルをバイナリで open して、 InstrBを利用し、バイナリ検索をして、そのアドレス位置を取得する 仕組みのプログラムを作成しています。 VB.NETにて、同じプログラムを組もうとしたのですが、 InstrB は、サポートしなくなっており困っています。 特殊な文字コードとは関係なく純粋なバイナリでの検索が行いたいのですが いい方法はありませんでしょうか？ 下記は、現プログラムの例題を記入しました。 Dim Pw_bytData() As Byte Dim Pw_Search4(3) As Byte Dim Pw_address As Long FlNum = FreeFile Open strFlName For Binary Access Read As #FlNum Get #FlNum, , Pw_bytData 'バイナリデータの検索は、これが一番早いのか？？ ' "00 11 00 B1" を検索する Pw_Search4(0) = &H00 Pw_Search4(1) = &H11 Pw_Search4(2) = &H00 Pw_Search4(3) = &HB1 Pw_address = InStrB(Pw_bytData, Pw_Search4) - 1 Close #FlNum