键入时更改文本颜色

时间:2014-10-05 15:30:30

标签: .net vb.net

我想在输入时更改文字颜色。我在VB.NET中编码。我有RichTextBox,我想改变文字颜色。这是我在TextChanged事件中的代码:

Private Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rtbox.TextChanged
    Dim n As Integer = rtbox.SelectionStart 'Store the current position of cursor

    If rtbox.Text.IndexOf("<?php") <> -1 Then
        rtbox.SelectionStart = rtbox.Find("<?php")
        rtbox.SelectionColor = Color.Blue
        rtbox.SelectionStart = n
    End If

    If rtbox.Text.IndexOf("html") <> -1 Then
        rtbox.SelectionStart = rtbox.Find("html")
        rtbox.SelectionColor = Color.Red
        rtbox.SelectionStart = n
    End If

End Sub

如果我输入<?php,它会改变颜色

1 个答案:

答案 0 :(得分:1)

这不是突出语法的正确方法,因为richtext编辑器不适合用作语法高亮显示。 richtext编辑器也很慢,因此性能也很慢。

已经有语法荧光笔可用,你可以试试这个

https://github.com/PavelTorgashov/FastColoredTextBox

或者你可以尝试这个

https://colorcode.codeplex.com/