[2005 Tip] Read Any Text File Into A DagaGridView -

        'Create a new TextFieldParser. The following code creates the 
        'TextFieldParser named MyReader and opens the file test.txt.
        Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser("C:\ColumnsTestFileRandomLength.txt")
            'Define the TextField type and delimiter. The following code defines 
            'the TextFieldType property as Delimited and the delimiter as ",".
            MyReader.TextFieldType = FileIO.FieldType.Delimited
            MyReader.SetDelimiters(",")

            'Loop through the fields in the file. If any lines are corrupt, report an error 
            'and continue parsing. The following code loops through the file, creating a new 
            'array for each row and adding the fields to that array. The array is then added
            'to the grid as a row. Any fields that are formatted incorrectly are reported.
            'This code assumes there are no more than 20 fields in a row. You should change the 
            'ReDim r(20) to a bigger number if you need more columns (fields).
            Dim currentRow As String()
            Dim r() As String
            Dim i As Integer
            While Not MyReader.EndOfData
                Try
                    currentRow = MyReader.ReadFields()
                    ReDim r(20) 'Start a new row array
                    i = -1
                    Dim currentField As String
                    For Each currentField In currentRow
                        i = i + 1 'Get ready for the next string in the array
                        r(i) = currentField 'add the next string to the array
                    Next
                    'Add more columns to the grid if needed
                    If grd1.ColumnCount < i + 1 Then grd1.ColumnCount = i + 1
                    grd1.Rows.Add(r)
                Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
                    MsgBox("Line " & ex.Message & "is not valid and will be skipped.")
                End Try
            End While
        End Using