Stream File VB.Net Tutorial

Public Class Tester
    Public Shared Sub Main
        Dim headings() As String = {"Alpha", "Beta", "Gamma"}
        Dim workText As String = String.Join(",", headings)
        workText &= "1.1, 2.3, 4.5" & vbNewLine
        Dim filePath As String = My.Computer.FileSystem.CurrentDirectory & "\Test.csv"
        My.Computer.FileSystem.WriteAllText(filePath, workText, False)
    End Sub
End Class