Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim strText As String = "im some text thats going to be in your new .txt file" & Environment.NewLine & "and im multilined!"
Dim sWriter As IO.StreamWriter = New IO.StreamWriter(New IO.FileStream("D:\a_test.txt", IO.FileMode.OpenOrCreate))
sWriter.Write(strText)
sWriter.Close()
End Sub