' Project WriteToFile

' Show how to write to an output file.

Imports System.IO, System.Console
Public Module Module1

    Public Sub Main()
        Dim sw As New StreamWriter("OutputFile.txt")

        sw.WriteLine("This is a test,")
        sw.WriteLine("This is only a test.")
        sw.Close()

        WriteLine("Output written to file.")
        ReadLine()

    End Sub

End Module