はじめまして。この掲示板は初めて利用します。
ＶＢ５でエディタを作成しています。検索キーワード全てに色をつけたいのですが、
http://hanatyan.sakura.ne.jp/vbhlp/rich01.htm#no9
を試してみたところ、({}は色がついた部分)
{abcd}abcd{abcd}abcdabcdabcd{abcd}abcdabcdabcdabcdabcdabcdabcd{abcd}・・・
となってうまくいきません。
次の開始位置のバイト数を引き算する処理も考えましたが、
{abcd}{abcd}{abcd}abcdabcdabcd・・・
となってしまいます。
Instrを使用した方法も考えましたが、永遠ループになってしまい、だめでした。
どうすれば上手くできるでしょうか。よろしくお願いします。

> ＶＢ５でエディタを作成しています。検索キーワード全てに色をつけたいのですが、

VB5.0 と VB6.0 のリッチテキストボックスは違っているのでその辺の影響か？
サービスパック等はどのようになっているのでしょうか？

又、なぜに今頃、VB5.0 で作成されているのか？

今、試した限りでは、問題なくすべてに色がついております。
abc で検索しても同様にすべての abc だけに色がついています。

下記に実行結果をUP
http://hanatyan.sakura.ne.jp/Image1.gif

VB5.0 SP3 の環境で試して見ても同様に問題なく検索して色を付ける事が
できました。
因みに、掲載しているサンプルコードをコピー＆ペーストして試しても同じでした。

abcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcd
abあああabcdabcdabあああabcdabcdabあああabcdabcdabあああabcdabcd

の両方で試して見ましたが問題なく検索・表示されました。
下記のような情報もありますが、上記のように試して見ましたが問題は表れません。
http://support.microsoft.com/default.aspx?scid=kb;ja;JP412491

RichTx32.ocx  5.01.4319  VB5.0(SP3)   Windows95

そのままのコードで試して見ても同じでしょうか？

返信ありがとうございました。

すみません。
コピー＆ペーストで確認したところ、正常に動作しました。
ソースをもう一度確認してみます。
ＶＢ５無印
RICHTX32.OCX 5.0.37.14

>又、なぜに今頃、VB5.0 で作成されているのか？
VB2005Expressも導入済みですが、作成途中のソースがＶＢ５系統だったためです。