Visual Basic - Ayuda con archivos

Hola amigos del forro necesito abrir un archivo *.txt y manipularlo despues colocarlo en una tabla como lo ago
gracias anticipadas

Fijate con esto:

Dim Lineas As Variant, i As Integer

Lineas = Split(FileToString(App.Path & "\MiArchivo.txt"), vbCrLf)

Luego Lineas es un vector donde cada elemento es una línea del archivo, luego lo puedes manejar por cada línea separada.

For i = LBound(Lineas) To UBound(Lineas)

Si por ejemplo el archivo está delimitado por comas puedes hacer:

Columnas = Split(Lineas(i),",")

For j=LBound(Columnas) To UBound(Columnas)
' Codigo para cargar cada valor en tu tabla.
Next j

Next i

Public Function FileToString(FileName As String) As String
Dim hlngFile As Long, strFile As String
hlngFile = FreeFile
Open FileName For Binary Access Read As hlngFile
FileToString = vbNullString
strFile = String(FileLen(FileName), " ")
Get hlngFile, , strFile
Close hlngFile
FileToString = strFile
End Function

Hola Gracias por la ayuda
COmo le hago para pasar los valores a la tabla

Depende del método de acceso a datos que estés utilizando (DAO, ADO, RDO)

Uso ADO
en un DataGrid