Pasar Datos Txt Separados Por Coma A Un List

[ideasking]

Hola, si alguien tiene el codigo para pasar datos de un archivo txt separado por comas:

8,"LUIS",2728,"BOGOTA"

Para abrirlo uso:

Open "c:\data\registros.txt" For Input As #1
Input #1, Codigo, nombre,registro,ciudad

Pero no encuentro como mostrar los datos abiertos en un list que tiene 4 columnas.

Si necesitara mostrar solo un campo lo hago asi:

Open "c:\data\registros.txt" For Input As #1
Input #1, codigo, nombre,registro,ciudad

List1.additem nombre

y me muestra todos los nombres, pero no se como hacer para que me muestre todos los campos cada uno en una columna de las lista.

Si alguien tiene una sugerencia les agradezco.

Cordial saludo.