VB.Net/File Directory/Stream Writer

StreamWriter WriteLine

<source lang="vbnet"> Imports System Imports System.Data Imports System.IO public class MainClass

  Shared Sub Main()
      Dim FileToRead As String = CurDir + "test.txt"
      Dim TestFile As FileStream
      Try
          TestFile = New FileStream(FileToRead, FileMode.Create, FileAccess.ReadWrite)
          Dim Writer As New StreamWriter(TestFile)
          Writer.WriteLine("8")
          Writer.WriteLine("7")
          Writer.WriteLine("0")
          Writer.WriteLine("ABC")
          Writer.WriteLine("5")
          Writer.Flush()
          TestFile.Seek(0, SeekOrigin.Begin)
      Catch CantCreate As Exception
          Console.WriteLine("Can"t create or write the file")
          Exit Sub
      End Try
  End Sub

End Class

      </source>