Borrar una linea de texto de un archivo txt en .net

[megaligathor]

saludos a todos. Como aqui no todos es consultas sino tambien el intercambio de ideas, aqui les dejo mi humilde aporte.

Hace unos dias estuve investigando acerca de como hacer para borrar una linea de texto de un archivo txt, pero sin resultado alguno por internet. Leyendo algunos textos llegué a una solución eficiente de esto. Pero aparte de ello me llamó la atención que por internet hubo personas que tenian el mismo problema. Por ello, dejo el código.

Este es el código para eliminar la ultima linea

Código:

Public Sub BorrarUltimaLinea(ByRef RutaArchivo As String)
        Dim ListaLineas As New List(Of String)
        ListaLineas.AddRange(System.IO.File.ReadAllLines(RutaArchivo))
        ListaLineas.RemoveAt(ListaLineas.Count - 1)
        System.IO.File.WriteAllLines(RutaArchivo, ListaLineas.ToArray)
End Sub 

Este otro elimina una linea especifica con un entero

Código:

Public Sub BorrarLineaEspecifica(ByRef RutaArchivo As String, ByVal Linea As Integer)
        Dim ListaLineas As New List(Of String)
        ListaLineas.AddRange(System.IO.File.ReadAllLines(RutaArchivo))
        If Linea >= ListaLineas.Count Then Exit Sub
        ListaLineas.RemoveAt(Linea)
        System.IO.File.WriteAllLines(RutaArchivo, ListaLineas.ToArray)
End Sub 

Estos códigos tambien funcionan para manipular archivos xml. Pero para ello tener en cuenta la secuencia de sus nodos.


Espero ayudar a algunos miembros de este foro con este aporte. Hasta la próxima

RealTMegalix