有谁知道用richtext控件显示带颜色的VB代码？谢谢！

如题

解决方案 »

  1.   

    这是你要的：给分吧！Private Sub list3_Click()   '选定字符改变颜色
    On Error Resume Next
      CommonDialog1.ShowColor
      list3.BackColor = CommonDialog1.Color
      rtfText.SelColor = list3.BackColor
    End Sub
      

  2.   

    忘了说了，list3其实是textbox的控件名。我用的资料是取名list3，我懒得改了，建议你改名，免得自己都识别不了！
      

  3.   

    就像VB ide编辑器，可以把关键字和注释分色显示
      

  4.   

    这样的程序用RichTextBox来做太慢了,输入的代码多的话,光刷新就得半天
      

  5.   

    不用richtextBox，有其它好办法么？
    提供思路！！！
      

  6.   

    看来用VC做一个控件比较实际，
    其实我只需要的是浏览，不像VB ide中要编辑之类的。谁能提供思路？
      

  7.   

    留个E-Mail我发给你cmax20.ocx，包括原码和范例
      

  8.   

    原码为VC的支持Basic和其他7-8种语言
      

  9.   

    [email protected]
    谢谢！！！
      

  10.   

    也给我好吗？
    [email protected]
      

  11.   

    richtextBox1.SelColor = QBColor(2)      '绿
    richtextBox1.SelText = "绿色"& vbCrLf
    richtextBox1.SelColor = vbred           '红
    richtextBox1.SelText = "红色"& vbCrLf
      

  12.   

    我看到一个，是做Html的编辑器的