<pre lang="VB"><pre>lblWindowsVersion.Text = "Windows Version: " & My.Computer.Info.OSVersion
Dim WinEdition As String = Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\WOW6432Node\Microsoft\Windows NT\CurrentVersion", "ProductName", Nothing)
Dim WinEdition4 As String = My.Computer.Info.OSFullName
Computer\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion
EditionID
Windows NT\CurrentVersion
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)