Tag

#VB.NET

Posts

• SnippetJul 2, 2012

  RichTextBox: highlight a line on click

  Handle the MouseDown event of a WinForms RichTextBox to select the whole line under the mouse.

  Private Sub RichTextBox1_MouseDown(ByVal sender As Object, ByVal e As MouseEventArgs) Handles RichTextBox1.MouseDown
      Dim box = DirectCast(sender, RichTextBox)
      Dim index = box.GetCharIndexFromPosition(e.Location)
      Dim line = box.GetLineFromCharIndex(index)
      Dim lineStart = box.GetFirstCharIndexFromLine(line)
      Dim lineEnd = box.GetFirstCharIndexFromLine(line + 1)

  1 min read#.NET#VB.NET