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 MyFile as new FileInfo ("c:\autoexec.bat") Console.WriteLine("The length of autoexec.bat is " _ + MyFile.Length.ToString + " bytes.") End Sub End Module |