投稿日 | : 2003/04/08(Tue) 10:28 |
投稿者 | : mitu |
Eメール | : |
URL | : |
タイトル | : リッチテキストボックスの文字色 |
よろしくお願いします。
リッチテキストボックス内にファイルをドラッグ&ドロップします。
テキストの文字に色をつけるのですが、
一回、初期化をするために、以下のように、全文字列の文字色を黒にしています。
With rtfFile
strText = .Text
.SelStart = 0
.SelLength = Len(strText)
.SelColor = vbBlack
End With
ファイルサイズが1.3MB、テキストが、10000行ほどで、Len(strText)=1326063 ほどでやると
.SelLengthの部分で固まってしまいます。
これを固まらずに、全文字列の色を変えたいのです。
よろしくお願いします。