VB.NET读取文本区域中的当前行?

时间:2008-11-19 22:52:17

标签: .net vb.net richtextbox

我有一个文本区域和一个在其上进行语法高亮的功能。现在它读取整个RichTextBox。如何获得包含当前行的字符串变量?以下是我目前的代码。

Private Sub HighLight()
    Dim rm As System.Text.RegularExpressions.MatchCollection
    Dim m As System.Text.RegularExpressions.Match
    Dim x As Integer ''lets remember where the text courser was before we mess with it

    For Each pass In FrmColors.lb1.Items
        x = rtbMain.SelectionStart
        rm = System.Text.RegularExpressions.Regex.Matches(LCase(rtbMain.Text), LCase(pass))
        For Each m In rm
            rtbMain.Select(m.Index, m.Length)
            rtbMain.SelectionColor = Color.Blue
        Next
        rtbMain.Select(x, 0)
        rtbMain.SelectionColor = Color.Black
    Next
End Sub

2 个答案:

答案 0 :(得分:2)

没试过,但是:

rtbMain.Lines(lineNumber)

如果没有将Lines属性赋给数组并访问数组元素。

答案 1 :(得分:1)

我想你想要

rtbMain.Lines(rtbMain.GetLineFromCharIndex(rtbMain.SelectionStart))