Dim lines As New List(Of String)

        Dim lines As New List(Of String)
 
        Using sr As System.IO.StreamReader = New System.IO.StreamReader( _
          Startpfad & "\Daten\import.txt")
            Dim line As String
            While sr.Peek() > -1
                line = sr.ReadLine()
                lines.Add(line)
            End While
        End Using

list(29) = "Neue Daten"

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist