VB .NET - Saber a Versão Windows

Select Case Environment.OSVersion.Platform

            Case PlatformID.Win32NT

                Label1.Text = "Versão : Windows 95 ou 98"

            Case PlatformID.Win32S

                Label1.Text = "Versão : Windows NT , 2000 ou XP"

            Case PlatformID.Win32Windows

                Label1.Text = "Versão : Não suporta a plataforma .NET"

        End Select

        If Environment.OSVersion.Version.Major = 5 Then

            Label1.Text = "Versão : Windows 2000"

        End If