VB.Net Tutorial/Stream File/StreamWriter

Create StreamWriter from FileStream

Imports System.IO
public class Test
   public Shared Sub Main
        Dim objSW As StreamWriter
        Dim objFS As FileStream
        objFS = New FileStream("test.txt", FileMode.Create)
        objSW = New StreamWriter(objFS)
        objSW.Write("asdf")
        objSW.Close()
        objFS.Close()

   End Sub
End class

Save various data types to a text file

Imports System.IO
public class Test
   public Shared Sub Main
        Dim objSW As StreamWriter
        Dim objFS As FileStream
        Dim dteBDate As Date = #2/8/1960 1:04:00 PM#
        objFS = New FileStream("test.txt", FileMode.Create)
        objSW = New StreamWriter(objFS)
        With objSW
            .WriteLine(9.009)
            .WriteLine(1 / 3)
            .Write("The current date is ")
            .Write(Now())
            .WriteLine(True)
            .WriteLine("Your age in years is {0}, in months is {1}, " & _
               "in days is {2}, and in hours is {3}.", _
               DateDiff(DateInterval.Year, dteBDate, Now), _
               DateDiff(DateInterval.Month, dteBDate, Now), _
               DateDiff(DateInterval.Day, dteBDate, Now), _
               DateDiff(DateInterval.Hour, dteBDate, Now))
            .Close()
        End With
        objFS.Close()
   End Sub
End class

Use StreamWriter and StreamReader to deal with text file

Imports System.IO
public class Test
   public Shared Sub Main
        Dim file_name As String = "test.txt"
        Dim stream_writer As New StreamWriter(file_name)
        stream_writer.Write("The quick brown fox")
        stream_writer.WriteLine(" jumps over the lazy dog.")
        stream_writer.Close()
        Dim stream_reader As New StreamReader(file_name)
        Console.WriteLine(stream_reader.ReadToEnd())
        stream_reader.Close()
   End Sub
End class

The quick brown fox jumps over the lazy dog.