Forse qualcosa del genere:
Dim lines() As String = IO.File.ReadAllLines(path)
Console.WriteLine("numero delle righe: " & lines.Length)
Console.WriteLine("testo della prima riga: " & lines(0).ToString)
Console.WriteLine("testo dell' ultima riga: " & lines(lines.Length - 1).ToString)
' legge le righe escluse prima e ultima
' per leggere tutto a= 0 e lines.Length - 1
For a = 1 To lines.Length - 2 Step 1
Console.WriteLine(lines(a))
Next
che alla fine è un semplice array....