在VB.NET中实现Go语言代码编辑器的语法高亮问题求助

一、解决fmt.Println这类标识符的高亮问题 #

现有正则仅匹配Go语言关键字，fmt.Println属于标准库包名+函数名的组合，需要扩展正则规则覆盖这类模式。可以把匹配规则拆分为两类：

• Go关键字：保留原有关键字列表，用\b单词边界避免匹配子串（比如不会把function里的func误判为关键字）
• 标准库调用：匹配包名.函数名格式的标识符

修改后的正则规则：

Dim keywordPattern As String = "\b(break|default|func|interface|select|case|defer|go|map|struct|chan|else|goto|package|switch|const|fallthrough|if|range|type|continue|for|import|return|var)\b"
Dim stdLibPattern As String = "\b(\w+\.\w+)\b"

二、解决文本颜色闪烁问题 #

闪烁源于每次修改选中区域颜色时，TextBox都会触发重绘。解决核心是先暂停控件重绘，处理完所有高亮后再恢复重绘，同时简化不必要的光标操作。

修改后的完整代码 #

' 保存原始光标位置和默认输入颜色
Dim originalCursorPos As Integer = TextBox2.SelectionStart
Dim originalColor As Color = TextBox2.ForeColor

' 暂停控件重绘，彻底避免闪烁
TextBox2.SuspendLayout()

' 高亮Go关键字
Dim keywordRegex As New Regex(keywordPattern)
Dim keywordMatches As MatchCollection = keywordRegex.Matches(TextBox2.Text)
For Each m As Match In keywordMatches
    TextBox2.Select(m.Index, m.Length)
    TextBox2.SelectionColor = Color.FromArgb(0, 122, 204) ' 关键字用蓝色
Next

' 高亮标准库调用（如fmt.Println）
Dim stdLibRegex As New Regex(stdLibPattern)
Dim stdLibMatches As MatchCollection = stdLibRegex.Matches(TextBox2.Text)
For Each m As Match In stdLibMatches
    TextBox2.Select(m.Index, m.Length)
    TextBox2.SelectionColor = Color.Green ' 标准库调用用绿色
Next

' 恢复光标位置和默认输入颜色
TextBox2.SelectionStart = originalCursorPos
TextBox2.SelectionLength = 0
TextBox2.ForeColor = originalColor

' 恢复控件重绘
TextBox2.ResumeLayout()

补充说明 #

• 若需要更精准的高亮（比如区分字符串、注释），可以继续扩展正则规则，按不同语法元素分类处理
• 如果SuspendLayout效果不够彻底，可改用API级别的重绘控制，需要先声明：

Private Const WM_SETREDRAW As Integer = &HB
<DllImport("user32.dll")>
Private Shared Function SendMessage(hWnd As IntPtr, Msg As Integer, wParam As Integer, lParam As Integer) As Integer
End Function

然后将暂停/恢复重绘的代码替换为：

SendMessage(TextBox2.Handle, WM_SETREDRAW, False, 0) ' 暂停
' ... 高亮处理代码 ...
SendMessage(TextBox2.Handle, WM_SETREDRAW, True, 0) ' 恢复
TextBox2.Invalidate() ' 强制刷新一次

内容的提问来源于stack exchange，提问作者PratyushKing