Visual Basic - importar txt

hola, tengo que importar una lista de registros generados en un txt y separar los campos para insertarlos en una tabla access, por favor si alguien puede orientarme un poco le quedo muy agradecido.

Hola Pablo :
Aqui te envio un codigo para que lo analices y lo acomodes en tu aplicacion :

num= freefile
open app.path & "\archivo.txt" for output as #num
print #num, "Codigo Descripcion "
print #num, "--------- -------------------------- "

do while not rsTABLA.eof
print #num, rsTABLA!codigo & " " & rsTABLA!descrip
rsTABLA.movenext
loop

close(num)

SALUDOS