نوشتن در یک فایل متنی هم با این کد انجام میشه . 


Dim Writter As StreamWriter = File.AppendText("C:\Test1.txt")

        With Writter

            .WriteLine("I'm a Text File and Created By Your Program")

            .Flush()

            .Close()

        End With