Существует очень простое решение для удаления нескольких экземпляров выделенных фрагментов, которые вы создали, без вмешательства со всеми остальными выделениями, другим форматированием и т. Д .:
Используйте уникальный цвет подсветки, который никто другой, вероятно, не будет использовать, например,
hColor as color = Color.FromArgb(255, 255, 1)
Затем, чтобы удалить все экземпляры выделений этого цвета из вашего расширенного текста:
Dim t As String = TextBox1.Rtf
t = t.Replace("\red255\green255\blue1;", "\red255\green255\blue255;")
TextBox1.Rtf = t
Это заменяет ваш специальный цвет подсветки тем же цветом, что и фон, в данном случае Color.FromArgb (255, 255, 255), без необходимости искать какие-либо выделенные слова или реализовывать любой другой код.
Пока, пока, выделите ...