Mega Code Archive

 

Categories / VB.Net / File Directory

 

Flush data to StreamWriter

Imports System Imports System.IO Public Class AppendTextTest     Public Shared Sub Main()         Dim fi As New FileInfo("temp.txt")         Dim sw As StreamWriter = fi.AppendText()         sw.WriteLine("...")         sw.Flush()         sw.Close()         Dim sr As New StreamReader(fi.OpenRead())         While sr.Peek() <> -1             Console.WriteLine(sr.ReadLine())         End While     End Sub End Class