Linguaggio visual basic 6

Ciao ragazzi io usando questo codice:

codice:
Dim r
Dim c
 With MSFlexGrid1
        For r = 1 To .Rows - 1
            For c = 1 To .Cols - 1
                Printer.Print .TextMatrix(r, c);
            Next c
            Printer.Print
        Next r
    End With
    Printer.EndDoc
riesco a stampare una MSflexgrid dopo aver effettuato delle manipolazioni con delle query
il problema e sicuramente ve ne siete gia' accorti ,mi stampa tutti i record attaccati Es.
PippoVia massan 21Torino
io vorrei stampare cosi: Pippo Via Massa n 21 Torino e se possibile aggiungere una tabella
mi potete aiutare grazzieeeeee