Imports System
Imports System.Environment
Public Module modmain
   Sub Main()
      'The KPD-Team 2001
      'URL: http://www.allapi.net/dotnet/
      'E-Mail: KPDTeam@Allapi.net
      Console.WriteLine("Operating System Platform ID: " _
         + OSVersion.Platform.ToString)
      Console.WriteLine("Version: " + _
         OSVersion.Version.Major.ToString + "." _
         + OSVersion.Version.Minor.ToString)
   End Sub
End Module

Close this window