Visual Basic - dar espacios al imprimir en word desde VB

Mando imprimir cuadros de texto desde visual a Word pero imprime todo junto sin espacios como le doy espacios, estoy utilizando el appword?????

Hola. como estas, bueno espero serte de ayuda.

te puede servir el siguiente cdigo:

w1.Selection.Font.Underline = 1 'Texto Subrayado
w1.Selection.TypeText "Composición" + vbCrLf + vbCrLf 'Escrivo texto y dejo
'dos espacios de fila, como dos enter seguidos en Word.
w1.Selection.TypeText "Composición" & vbTab & "Nombre" + vbTab "Apellido"
'En este caso imprimo los tres textos separados por un TAB.
w1.Selection.TypeText "Composición " & " " & "Nombre" & vbCrLf
'Escrive composicion separado de varios blancos y luego escrive
'Nombre. Finalemte de un salto de fila (Enter de Word).

w1.Selection.InsertBreak wdPageBreak 'Te permite hacer un salto de pagina.

Dim w1 As Word.Application 'Variable que me permite acceder a Word.

Set w1 = New Word.Application
w1.Documents.Add
w1.Visible = True
'Ingreso datos alarchivo de Word
w1.Selection.Font.Bold = True
w1.Selection.ParagraphFormat.Alignment = Justificado
w1.Selection.Font.Name = "Arial"
'Ingreso todos los caracteres que deseo con los atributos de textos deseados
'y luego finalizo el documento con la siguiente instruccion.
Set w1 = Nothing

'Esto activando MicrosoftWord 10.0 Object Library en las referencias.
'Si declaras la conexion con la API puede varias algo, no recuerdo ahora, pero
'en cuanto a tu pregunta de los espacios, es igual.

'Espero haberte ayudado. Saludos
'Arnaldo.