743
社区成员
发帖
与我相关
我的任务
分享
Option Explicit
Private Sub Form_Load()
RichTextBox1.Text = "ÖлªÃñ¹ú"
RichTextBox1.SelStart = 0
RichTextBox1.SelLength = 2
RichTextBox1.SelColor = vbRed
RichTextBox1.SelStart = 2
RichTextBox1.SelLength = 2
RichTextBox1.SelColor = vbBlue
RichTextBox1.SelStart = 0
RichTextBox1.SelLength = 0
End Sub