|
Záleží, jak je soubor velký, pokud je malý (do pár megabajtů), tak si můžete načíst jednotlivé řádky do pole zavoláním
Dim pole() As String = System.IO.File.ReadAllLines("c:\soubor.txt")
Pak už toto pole v cyklu projděte pozpátku a řádky si vypište, kam libo:
For i As Integer = pole.Length - 1 To 0 Step -1
MsgBox(pole(i))
Next
všimněte si formulace For cyklu, je nutné uvést část Step -1, aby cyklus běžel pozpátku.
|