Imports System.IO
Module Module1
Sub Main()
Dim TextFile As New StreamWriter("test.txt")
TextFile.WriteLine("Line 1")
TextFile.WriteLine("www.rntsoft.com")
TextFile.Close()
Console.WriteLine("Text File created test.txt")
End Sub
End Module