投稿日 | : 2006/02/26(Sun) 17:24 |
投稿者 | : Blue |
Eメール | : |
URL | : |
タイトル | : Re^3: テキストボックス中の所定の文字列のみの色指定 |
SelColorって確かSelStart+SelLengthで設定した文字のいろが変わるんじゃなかったかなぁ。
Private Sub Command1_Click()
With RichTextBox1
.Text = "ABCD" & vbCrLf
.Text = .Text & "あいう" & vbCrLf
' ABCDを赤にする
.SelStart = 0
.SelLength = 4
.SelColor = vbRed
End With
End Sub
あ、しらべたら SelStartで任意の位置にしてから、SelText で文字列を設定すると色変わりますね。
Private Sub Command1_Click()
With RichTextBox1
.Text = .Text & "ABCD" & vbCrLf
.SelStart = Len(.Text)
.SelColor = vbRed
.SelText = "あいう"
.SelColor = vbBlack
End With
End Sub