csv con visual

[jalh1977]

saludos amigos, necesito saber como diablos abrir un csv con visual basic y guardar los valores en variables, ejemplo


esto seria en csv

juan,pedro,tito

valor(1) = juan
valor(2) = pedro
valor(3) = tito

gracias


ya lo solucione...dejo el ejemplo por si a alguien le sirve

Option Explicit


' variables de Ado para el rec y la conexión

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset

Private Sub Form_Load()
' cursor del lado del cliente
cn.CursorLocation = adUseClient

' abre el archivo de texto datos.txt ubicado en el app.path
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & App.Path & ";" _
& "Extended Properties='text;FMT=Delimited'"


' Ejecuta la consulta sql para llenar el recordset

rs.Open "Select * from archivo.csv ", cn, adOpenStatic


' enlaza el recordset con el DataGrid
Set DataGrid1.DataSource = rs
End Sub