allora diciamo che le cose sono migliorate ma non del tutto, praticamente riesco ad esportare i dati ma non come vorrei:
con questo codice riesco ad esportare

codice:
Dim sw As StreamWriter = New StreamWriter("\My Documents\DB\file.txt")
        For i As Integer = 0 To dataSet.Tables(0).Rows.Count - 1
            For a As Integer = 0 To 4
                sw.WriteLine(dataSet.Tables(0).Rows(i).Item(a))
            Next
        Next
        sw.Close()
però mi esporta così.

1
2
3
4
5

invece dorei esportali per riga cioè così

1 2 3 4 5

qualche suggerimento?