title: Listbox1 add all the items to richtextbox in the same format
body: <p>I'm trying to get all the <code>ListBox1</code> items and have them go to the <code>RichTextBox1</code>. I want it in the same format that it's in the <code>ListBox1</code>. I've tried different code and they seem to give extra blank lines in between items. So far I've thought of this but it give extra blank lines.</p>
  
  <pre><code>Dim counter As String
  
  counter = ListBox1.Items.Count - 1
  ListBox1.SelectedIndex = 0
  
  If ListBox1.SelectedIndex = 0 Then
      Do Until ListBox1.SelectedIndex = counter
          ListBox1.SelectedIndex = ListBox1.SelectedIndex + 1
          RichTextBox1.Text = RichTextBox1.Text &amp; vbNewLine &amp; ListBox1.SelectedItem
      Loop
  End If
  </code></pre>