我有一个文本区域和一个在其上进行语法高亮的功能。现在它读取整个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
答案 0 :(得分:2)
没试过,但是:
rtbMain.Lines(lineNumber)
如果没有将Lines属性赋给数组并访问数组元素。
答案 1 :(得分:1)
我想你想要
rtbMain.Lines(rtbMain.GetLineFromCharIndex(rtbMain.SelectionStart))