Here you go. Thank me please
Change the user name to yours
[php]Imports System.IO
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim TextFile As New StreamWriter("c:\Users\Zack\Desktop\test.txt")
TextFile.WriteLine("Text here")
' make more of these TextFile.WriteLine("Text here")to get more lines.
TextFile.Close()
End Sub
End Class[/php]