Es difícil entender qué quieres hacer: Puedes pretender hacer un documento con varios campos de un registro, o hacer un fichero de texto con el campo "x" de toda la base de datos... Otro inconveniente es que desconocemos de qué tipo son esos campos que pretendes convertir... Porque, claro está, si se trata de un campo numérico, tendrías que hacer una previa conversión a str(campo); y no digo nada si se trata de una fecha...
En términos generales, y suponiendo que quieras hacer un texto que contenga todos los campos (alfanuméricos) de un registro (voy a evitar el término "For Each" por si no te es familiar), harías así:
Texto = ""
for n = 0 to rs.Recordset.RecordCount - 1
Texto = Texto & Rs.Recordset.Fields(n)
next
(Espero sepas que previamente has de haber definido la variable: Dim Texto as String, y que hayas abierto tu base de datos con un Recordset de nombre Rs...)
Suerte.
