cambiá esto:
Código:
wrdApp.ActiveDocument.Content.Text = rs(0)&"<br> "
wrdApp.ActiveDocument.Content.Text = rs(1)&"<br> "
wrdApp.ActiveDocument.Content.Text = rs(2)&"<br> "
wrdApp.ActiveDocument.Content.Text = rs(3)&"<br> "
wrdApp.ActiveDocument.Content.Text = rs(4)&"<br> "
wrdApp.ActiveDocument.Content.Text = rs(5)
Por esto:
Código:
tmp = rs(0)&"<br> "
tmp = tmp & rs(1)&"<br> "
tmp = tmp & rs(2)&"<br> "
tmp = tmp & rs(3)&"<br> "
tmp = tmp & rs(4)&"<br> "
tmp = tmp & rs(5)
wrdApp.ActiveDocument.Content.Text = tmp
¿Entendés la diferencia entre lo que hice y lo que tenías? Si no, avisá y se te explica.
También tené en cuanta lo que
marco_foros dice acerca de los saltos de línea.