Hola, como estan, tengo la siguiente consulta, como cargo un los datos de un archivo txt a un flexgrid, para despues pasarlos a una base de dato.
El formato del archivo txtes siguiente:

DNIPeriodo Fecha Importe
30490659,1008,24102008,0040050

23000000,1008,31102008,0105050

Gracias.

Código:

Dim linea As String
Dim Datos() As String

MSFlexGrid1.Cols = 4
MSFlexGrid1.Rows = 0
Open "c:\prueba.txt" For Input As #1
 While Not EOF(1)
 Line Input #1, linea
 If InStr(1, linea, ",") > 1 Then
 Datos = Split(linea, ",")
 MSFlexGrid1.AddItem Datos(0) & vbTab & Datos(1) & vbTab & Datos(2) & vbTab & Datos(3)
 End If
 Wend
Close #1

era algo muy sencillo, ya me funciono, te agradezco