Visual Basic - Acepto Sugerencias

tengo un archivo .csv (datos separados por comas) algo asi:

,,1,2,3,4
Producto1,10,50,,20
Producto2,,15,,20

En fin, la primera fila son codigos de clientes (,,1,2,3,4) y las demas filas son productos solicitados por esos clientes: asi, en la segunda fila el cliente 1 solicito 10 del producto1, el 2 solicito 50, el 3 no solicito nada y el 4 solicito 20. En la tercera fila el cliente 1 no solicito nada, el 2 15, el 3 nada y el 4 20.

Tengo asi 3000 clientes y trescientos productos y necesito leer el erchivo y grabar el codigo del cliente en una tabla master y su correspondiente pedido en una tabla detalle.

Si pueden darme ideas de como puedo hacer esto les agradezco.

Cordial Saludo.

Con el siguiente codigo lees el archivo y lo recorres hasta el final

'ABRE EL ARCHIVO
Open ArchivoACargar For Input As #1
'RECORRE EL ARCHIVO
Do While Not EOF(1)
'LEE UNA LINEA DEL ARCHIVO
Line Input #1, Linea
'SE LLEVA UN CONTADOR YA QUE EL PROCESO PARA LA
'PRIMERA LÍNEA ES DIFERENTE AL RESTO EN TU CASO
Contador = Contador + 1
'CON SPLIT SE COLOCA EN UN LAS POSICIONES DE UN VECTOR
'SEGMENTOS DE LA LINEA LEIDA DEL ARCHIVO, LOS SEGMENTOS
'SE TOMAN DE ACUERDO AL SEPARADOR QUE SE COLOQUE
'EN ESTE CASO LA COMA
vector = split(Linea,",")
'CON UBOUND SABES CUANTAS POSICIONES TIENE EL VECTOR
N = Ubound(vector)
'YA TIENES EN CADA POSICION DEL VECTOR UN VALOR O UNA
'CADENA VACIA SEGUN LO QUE HAYA ENTRE LAS COMAS
Loop
Close #1

Espero te sirva, suerte

Con el siguiente codigo lees el archivo y lo recorres hasta el final

'ABRE EL ARCHIVO
Open ArchivoACargar For Input As #1
'RECORRE EL ARCHIVO
Do While Not EOF(1)
'LEE UNA LINEA DEL ARCHIVO
Line Input #1, Linea
'SE LLEVA UN CONTADOR YA QUE EL PROCESO PARA LA
'PRIMERA LÍNEA ES DIFERENTE AL RESTO EN TU CASO
Contador = Contador + 1
'CON SPLIT SE COLOCA EN UN LAS POSICIONES DE UN VECTOR
'SEGMENTOS DE LA LINEA LEIDA DEL ARCHIVO, LOS SEGMENTOS
'SE TOMAN DE ACUERDO AL SEPARADOR QUE SE COLOQUE
'EN ESTE CASO LA COMA
vector = split(Linea,",")
'CON UBOUND SABES CUANTAS POSICIONES TIENE EL VECTOR
N = Ubound(vector)
'YA TIENES EN CADA POSICION DEL VECTOR UN VALOR O UNA
'CADENA VACIA SEGUN LO QUE HAYA ENTRE LAS COMAS
Loop
Close #1

Espero te sirva, suerte

Con el siguiente codigo lees el archivo y lo recorres hasta el final

'ABRE EL ARCHIVO
Open ArchivoACargar For Input As #1
'RECORRE EL ARCHIVO
Do While Not EOF(1)
'LEE UNA LINEA DEL ARCHIVO
Line Input #1, Linea
'SE LLEVA UN CONTADOR YA QUE EL PROCESO PARA LA
'PRIMERA LÍNEA ES DIFERENTE AL RESTO EN TU CASO
Contador = Contador + 1
'CON SPLIT SE COLOCA EN UN LAS POSICIONES DE UN VECTOR
'SEGMENTOS DE LA LINEA LEIDA DEL ARCHIVO, LOS SEGMENTOS
'SE TOMAN DE ACUERDO AL SEPARADOR QUE SE COLOQUE
'EN ESTE CASO LA COMA
vector = split(Linea,",")
'CON UBOUND SABES CUANTAS POSICIONES TIENE EL VECTOR
N = Ubound(vector)
'YA TIENES EN CADA POSICION DEL VECTOR UN VALOR O UNA
'CADENA VACIA SEGUN LO QUE HAYA ENTRE LAS COMAS
Loop
Close #1

Espero te sirva, suerte