Ver originalDim Lineas() As String = System.IO.File.ReadAllLines("f:\SkyDrive\Descargas\prueba.txt") Dim texto As String For i = (Lineas.Length - 6) To (Lineas.Length - 1) texto = Lineas(i) Next