Pour chaque ligne dans les lignes sélectionnées (vb.net)

Question

comment puis-je obtenir les lignes qui ont du texte sélectionné en eux? Par exemple:

Les lignes sélectionnées seraient 1, 2,3 et 4 (0 étant la première ligne)

Comment puis-je obtenir à code comme:

For Each line as string(or integer) in textbox1."SelectedLines" 
    'Do something here for each line 
Next 

Merci

Answer 1

Prenant littéralement vous, vous devez trouver les numéros de ligne, même si seules parties de la ligne 1 et 4 sont sélectionnés. Procédez comme suit:

If RichTextBox1.SelectionLength > 0 Then 
     Dim firstLine As Integer = RichTextBox1.GetLineFromCharIndex(RichTextBox1.SelectionStart) 
     Dim lastLine As Integer = RichTextBox1.GetLineFromCharIndex(RichTextBox1.SelectionStart + RichTextBox1.SelectionLength) 
     For line As Integer = firstLine To lastLine 
      Dim txt = RichTextBox1.Lines(line) 
      ' do something... 
     Next 
    End If 

Answer 2

Je pense que vous recherchez la propriété SelectedText. (en C#)

foreach(string line in textBox1.SelectedText.Split(new string[] {Environment.NewLine}, StringSplitOptions.RemoveEmptyEntries)) 
{ 
    //dostuffhere 
} 

(dans ma tentative de VB)

Dim splitter(1) As String 
    splitter(0) = Environment.NewLine 
    For Each y As String In TextBox1.SelectedText.Split(splitter, StringSplitOptions.RemoveEmptyEntries) 
     //do stuff here 
    Next