dotNETportal.cz

Asi nejjednodušší bude soubor přeuložit celý znovu:

        ' soubor se kterým budeme pracovat
        Dim soubor As String = "d:\todel\cat.txt"

        ' načteme starý obsah
        Dim staryObsah As String = FileIO.FileSystem.ReadAllText(soubor)

        ' otevřeme výstupní soubor pro zápis
        Dim str As IO.StreamWriter = _
        FileIO.FileSystem.OpenTextFileWriter(soubor, False)
        str.WriteLine("novy text") ' novy radek
        str.Write(staryObsah)
        str.Close()

Nevýhodou je, že se načte celý soubor nejdříve do paměti. Použití sekvenčního čtení a zápisu by nebyl sice problém, ale pro menší soubory je to zbytečné.