'ListView erstellen und ListView Werte aus Textdatei einlesen
    Public Sub listViewLaden(ByVal spaltenAnzahl As Integer, ByVal lv As _
      ListView, ByVal path As String)
        Dim spaltenTitel As String
        Dim spaltenTitelNr As Integer
        spaltenTitel = "SP"
        spaltenTitelNr = 1
 
        'ListView Spaltentitel erstellen
        With lv.Columns
            For i As Integer = 1 To spaltenAnzahl
                .Add(spaltenTitel & spaltenTitelNr, 200)
                spaltenTitelNr = +1
            Next
        End With
 
        Using Reader As New System.IO.BinaryReader(System.IO.File.Open(path, _
          System.IO.FileMode.Open, System.IO.FileAccess.Read))
            While Reader.BaseStream.Position < Reader.BaseStream.Length
                'ListView Items einlesen
                With lv.Items.Add(Reader.ReadString())
                    For i As Integer = 1 To lv.Columns.Count - 1
                        .SubItems.Add(Reader.ReadString())
                    Next
                End With
            End While
        End Using
    End Sub

Windows 7 64bit, Visual Studio 2013