Sub Main() Dim oStreamWriter As System.IO.StreamWriter Dim bAppend As Boolean = False
oStreamWriter = New System.IO.StreamWriter ("c:\temp\hallo.txt", bAppend) oStreamWriter.AutoFlush = True ' Wenn Autoflush =False dann am Ende die Flush Methde aufrufen! oStreamWriter.WriteLine ("BlaBla") oStreamWriter.Flush 'Wegen autoflush ist das eigentlich nicht nötig! oStreamWriter.Close oStreamWriter.Dispose