RichTextBoxで色を置換 (ID:111408)

名前

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

本文 色を変えるだけなら簡単だからねぇ。 [VB6.0] Private Sub Command1_Click() With Me.RichTextBox1 .Text = "012345678901234567890" .SelStart = 3 .SelLength = 4 .SelColor = vbRed End With End Sub あとは色を変える文字の位置と長さが分かればいいわけです。 正規表現の検索ができるなら、あとは文字列操作関数使えば… 検索で引っかかった文字の InStr とか？ …同じ文字の２回目の出現も気にしてね？