主题：文本框中查找到的字符，如何高亮显示？

Dim c1 As winform.control=e.Form.controls("textbox1")
Dim c2 As winform.control=e.Form.controls("textbox2")
Dim t1 As String=e.Form.Controls("TextBox1").text
Dim t2 As String=e.Form.Controls("TextBox2").text

c1.Select()
If t2 <> "" Then
    If Instr(t1,t2) <> 0 Then
        c1.SelectionStart = Instr(t1,t2)-1
        c1.SelectionLength = Len(t2)
    Else
        MessageBox.Show("没有找到!", "提示", MessageBoxButtons.ok, MessageBoxIcon.Question)
    End If
Else
    MessageBox.Show("请输入要查找的字符!", "提示", MessageBoxButtons.ok, MessageBoxIcon.Question)
End If

这段代码看似没有问题，但不能保存，求助。

但第三行是对的