'falls erforderlich, geeigneten Text-Encoder erstellen
   Dim enc As New System.Text.UTF7Encoding
 
   'Text lesen 
   Dim mytext As String = IO.File.ReadAllText("D:\demos\test.txt", enc)
 
   '.... Manipulation der Zeichenfolge in myTEXT
   '...................
 
   'Manipulierten Text (Stapelverarbeitungsanweisungen / ASCII) schreiben
   IO.File.WriteAllText("D:\batchfiles\test.bat", mytext, _
        New System.Text.ASCIIEncoding)