Probaste a utilizar la función split?

Esto se hace de esta forma:

Pongamos que tienes esta estructura en el fichero:

campo1,campo2,campo3,campo4
campo5,campo6,campo7,campo8

pues en el código haces los siguiente:

Te creas un array

dim miArray() as string

y cada vez que lees una línea del fichero haces lo siguiente

LineaLeída tendrá este valor: "campo1,campo2,campo3,campo4"
miarray=split(LineaLeída,",")

Como resultado tienes un array con cada parte del texto que tu querías
miarray(0)="campo1"
miarray(1)="campo2"
miarray(2)="campo3"
miarray(3)="campo4"

__________________
Ningún Hombre Tiene Derecho A Gobernar A Otro Hombre. (F. Ascaso)