Imports System Imports System.IO Public Module modmain Sub Main() 'KPD-Team 2001 'URL: http://www.allapi.net/dotnet/ 'E-Mail: KPDTeam@Allapi.net Dim swFile as StreamWriter = File.CreateText("C:\myfile.ext") swFile.WriteLine("Hello World ;)") swFile.Flush() swFile.Close() End Sub End Module |