Herfried,
I tried your code with a little change, what is the sense of this result.
///
\\\
Array.Sort(Lines)
Dim Lines() As String = Split(sr.ReadToEnd, ControlChars.NewLine)
Dim sr As New StreamReader("C:\Test\Herfrieds.txt")
For Each Line As String In Lines
M V P <URL:
http://dotnet.mvps.org/>
Next Line
sr.Close()
You can sort the lines alphabetically:
Please, read my message again
Cor