Visual Basic - Pasar archivo txt a visual basic

Hola a todos:

Tengo un problema que no puedo resolver y me urge un poco, si alguien me puede ayudar, mi problema es este:

Tengo que tomar la información de un archivo txt que esta conformado de la siguiente manera.

1150686|A|12557|02/01/2001|1100 R 20.0
1150686|B|12558|02/01/2001|1100 R 20.0
1150686|C|12553|02/01/2001|1100 R 20.0
1150686|D|12555|02/01/2001|1100 R 20.0
1150686|E|12556|02/01/2001|1100 R 20.0

Se supone que que despues de cada ( | ) es una columna y no se como lo puedo hacer.

Espero su respuesta...

ese esta muy facil, se supone que ese texto lo estas leyendo en una caja de texto multilinea, seria algo asi

for x=1 to len(Text1)
if mid(Text1,x,1)="I" then mid(Text1,x,1)=VBTab
next x