While Petlja - Pomoc...

Code:
 If startindex >= 0 Then

            RichTextBox1.SelectionColor = Color.Red

            Dim endindex As Integer = "<td><p>".Length + (40)

            RichTextBox1.Select(startindex, endindex)
            
            RichTextBox2.AppendText(RichTextBox1.SelectedText & vbNewLine)
         
            start = startindex + endindex

        End If

Code:
   For x As Integer = 0 To RichTextBox2.Text.Length - 1
        'RichTextBox2.SelectionStart = x
        '   RichTextBox2.SelectionLength = 1
        '  If RichTextBox2.SelectedText = " " Then RichTextBox2.SelectedText = ""
        '  Next

Code:

for brojac as integer = 0 to 3
      For x As Integer = 0 To RichTextBox2.Text.Length - 1
        RichTextBox2.SelectionStart = x
        RichTextBox2.SelectionLength = 1
        If RichTextBox2.SelectedText = " " Then 
             RichTextBox2.SelectedText = ""
        end if
      Next
next