经搜索,如下两个链接提到Richtextbox下字体颜色设定的方法,
链接一:http://community.csdn.net/Expert/topic/4765/4765789.xml?temp=.0509302
richtextbox为何无法设置字体颜色呀?textbox控件是可以设的.为何richtextbox就不行呢?链接二:http://community.csdn.net/Expert/topic/4888/4888960.xml?temp=.640774
请教!Richtextbox字体颜色的设置 具体内容如下:
     richtextbox26.SelStart = Len(richtextbox26.Text) '
     richtextbox26.SelText = ""
     richtextbox26.SelColor = RGB(78, 68, 251)
     richtextbox26.SelText = richtextbox26.Text & "能成功吗?"
     richtextbox26.SelText = ""
经我验证以下方法是通篇改变字体颜色,现请教各位大师,能有一种仅改变richtextbox中个别字体颜色的方法吗?比如将上例中“能成功吗?”几个字改变颜色,其他上、下文为黑色?
谢谢!在线等.............

解决方案 »

  1.   

    RichTextBox1.Text = "asdfasdfasdfasdfasdf"
    RichTextBox1.SelStart = 0
    RichTextBox1.SelLength = 2
    RichTextBox1.SelColor = vbRed
    RichTextBox1.SelStart = 5
    RichTextBox1.SelLength = 2
    RichTextBox1.SelColor = vbCyanRichTextBox1.SelStart = 7
    RichTextBox1.SelLength = 2
    RichTextBox1.SelColor = vbMagenta
      

  2.   

    RichTextBox1.Text = "asdfasdfasdfasdfasdf"
    RichTextBox1.SelStart = 0
    RichTextBox1.SelLength = 2
    RichTextBox1.SelColor = vbRed
    RichTextBox1.SelStart = 5
    RichTextBox1.SelLength = 2
    RichTextBox1.SelColor = vbCyanRichTextBox1.SelStart = 7
    RichTextBox1.SelLength = 2
    RichTextBox1.SelColor = vbMagenta
      

  3.   

    光看答案没意思,我给你说说原理
    首先,你要选中你要设置颜色的字体,这就要通过设置selstart(选中起始处)和sellength(选中几个字)属性
    接着设置selcolor(选中字的颜色)属性
    最后别忘了清空seltext,即richtextbox.seltext=""
    否则会有一些奇怪后果出现
    代码你就自己写吧