Error con VB.net 2008

[Aquaventus]

Hola jgallego87 Bienvenido al foro!, en una parte andas bien, pero para que leas linea por linea usa el peek, y mediante el array llenar el datagridview :

Asumo que tienes tus columnas hechas en tu datagridview

Código vb:

'El fullpath de tu archivo
        Dim archivo As String = "C:\Archivos de Programas\...."
 
        'Creo un arraypara almacenar los campos
        Dim campos() As String
 
        ' Comprobar que existe
        If System.IO.File.Exists(archivo) = False Then
            MessageBox.Show("Debes indicar un fichero que exista", _
                        "Leer fichero", _
                        MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
            Exit Sub
        End If
 
        'Creo un StremReader para leer el archivo
        Dim sr As New System.IO.StreamReader(archivo)
 
        'Recorro con el peek mientras no llegue al final
        While sr.Peek() <> -1
            ' Leer una linea del fichero
            Dim s As String = sr.ReadLine()
            'Paso los campos separados por ',' al arreglo de cadenas
            campos = s.Split(",")
            'Paso los valores del arreglo al datagridview y agrego una fila
            DataGridView1.Rows.Add(campos(0), campos(1), campos(2), campos(3),..,campos(26))
 
        End While
        'Cierro el StreamReader
        sr.Close()
 

Espero leas y lo entiendas. Saludos!.