No sé mucho de esto pero se me ocurre la idea de que formes tu string o línea de texto que deseas enviar al archivo de texto y lo envies al arcivo as:
Dim objEscritor As StreamWriter
objEscritor = File.AppendText("C:\registros.txt")
'Escribe en el archivo el contenido del
objEscritor.WriteLine("información de tu registro..") '[lee registro por registro, estructuralo en un string y enviarlo al archivo : campo1 & " "& campo2 & " " & campo3... etc..]
'Cierra el archivo.
objEscritor.Close()
