Texto a donde lo quiere migrar?

Una de las cosas que hace mucho me planteaba era como simplificar la transferencia de archivos de Texto (TXT) de distintos formatos sin tener que reinventar la rueda (ya la había reinventado muchas veces para esto) pero me encontre con algo que alguna vez vi pero la verdad no le habia prestado mucha atención, pero hoy lo analice mas profundamente y le di vuelta para adelante y para atrás hasta que encontré que realmente era lo que buscaba FileHelpers y la verdad me asombro, tiene unas cositas que luego vere como solucionarlas, pero por ahora creo que es una herramienta muy útil para resolver este tipo de problemas, les dejo un ejemplo de lectura de un archivo de texto plano que lee la configuración de los campos en forma dinámica de un archivo y muestra la información en la consola.

Espero que le sea tan útil como me fue a mi.

Imports System.IO

Imports FileHelpers
Imports FileHelpers.RunTime
Module CargaLista

Sub Main()

'
'Armar la clase en forma dinamica
'
Dim cb As ClassBuilder
cb = ClassBuilder.LoadFromXml("..\..\..\ClassDinamics\caramelos.xml")
dim engine as FileHelperEngine = New FileHelperEngine(cb.CreateRecordClass())

Dim dt As DataTable = engine.ReadFileAsDT("..\..\..\ListasDePrecioTXT\caramelos\Caramelos.txt")

For Each MiDataRow As DataRow In dt.Rows
Dim codigo = MiDataRow("Codigo")
Dim Detalle = MiDataRow("Detalle")
Dim Precio = MiDataRow("Precio")
Console.Write("Codigo: " + codigo)
Console.Write(" Detalle: " + Detalle)
Console.Write(" Precio:" + Precio)
Console.WriteLine()
Next
Console.ReadLine()
End Sub

End Module