你太小器了,问题这么复杂,要求还这么多,居然一分不给, 知道的人也不想给你回答.
Private Sub Form_Load()
RichTextBox1.Text = "中国人 " & vbCrLf & "网络公司 "
RichTextBox1.Font = "宋体 "
RichTextBox1.SelStart = 0
RichTextBox1.SelLength = 3
RichTextBox1.SelFontName = "宋体 "
RichTextBox1.SelFontSize = 25
RichTextBox1.SelColor = vbBlue
RichTextBox1.SelStart = 5
RichTextBox1.SelLength = 4
RichTextBox1.SelFontName = "黑体 "
RichTextBox1.SelFontSize = 18
RichTextBox1.SelColor = vbRed
RichTextBox1.SelLength = 0
End Sub
一般控件都有设置控件大小,颜色,背景的属性的文件,一般都是是js的文件,可以进行更改
楼上初始化也是个好办法,给我加分呗!!