FOR~NEXTで一文字ずつ調べていると文字数分オーバーヘッドが あるためINSTR関数が時間が掛かるような仕様で無ければ INSTR関数を使った方が処理時間は早いと考えます。 2文字以上の検索はMID$のみで処理をする場は二重ループで 検索する文字列を左から1文字ずつチェックして 途中で不一致だったらBREAKしてループを抜けたときに ループで使っている変数がループ回数と同じなら一致と判断 すればいいと思います。時間は掛かりそうですけど^^;;; @ANS_4 FOR I=0 TO LEN(S$)-1 FOR J=0 TO LEN(SE$)-1 IF MID$(S$,I,1)!=MID$(SE$,J,1) THEN BREAK NEXT IF J==LEN(SE$) THEN ? I;”もじめ” I=I+LEN(SE$) NEXT