Private Sub RichTextBox1_SelectionChanged(ByVal sender As Object, _
  ByVal e As System.EventArgs) Handles RichTextBox1.SelectionChanged
 
  ' Auswahl zurücksetzen
  RichTextBox1.SelectionLength = 0
End Sub

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de