Save various data types to a text file : StreamWriter « Stream File « VB.Net Tutorial

1. VB.Net Tutorial
2. Stream File
3. StreamWriter

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