Visual Basic

Private Sub PopulateTable(ByVal name As String)

        Me.Controls.Add(Me.ListviewTable2)
        FsrStreamReader = New System.IO.StreamReader("PreviousSaves.txt")

        'Use this variable to store a read line from the file
        Dim sLineFromFile As String
        FbReadingFirstLineOfFile = True

        'First of all clear the listview completely
        Me.ListviewTable2.Clear()
        Me.ListviewTable2.Show()

        'While our streamreader is not at the end of the file
        While FsrStreamReader.Peek <> -1

            'Read in the next line from our textfile
            sLineFromFile = FsrStreamReader.ReadLine()

            'If this is the first time that we read a string from the file, we take this string as the collection of columnheaders
            If FbReadingFirstLineOfFile Then

                'Split the string using the tabs between the columnheaders in the file
                'Loop trough our split collection and for every columnheader we add a column to our listview
                For Each sColumnHeaderString As String In sLineFromFile.Split(vbTab)
                    Me.ListviewTable2.Columns.Add(sColumnHeaderString, 125, HorizontalAlignment.Right)
                Next

                'We can reset this flag, the next lines is data, not columnheaderinfo
                FbReadingFirstLineOfFile = False

                'This is not in the first line from the file. We've read data now
            Else
                'Split the string using the spaces between the data chunks in the file
                'Add an item (and it's subitems) directly by using the split array.
                Me.ListviewTable2.Items.Add(New ListViewItem(sLineFromFile.Split(vbTab)))

            End If
        End While

        'Close the streamreader to free the file
        FsrStreamReader.Close()

    End Sub