Imports System.EnvironmentPublic Class Form1Private Sub DisplayOSVersionDim os As OperatingSystem = Environment.OSVersionMessageBox.Show("OS Version:" & os.Version.ToString())MessageBox.Show("OS platform:" & os.Platform.ToString())End SubEnd Class