JcmSoft - VB.NET   Obtendo a versão do Windows instalada

Para exibir a versão do Windows instalada não precisamos mais chamar nenhuma API basta usar a classe Environment. Usamos então a propriedade OSVersion que retorna o objeto System.OperatingSystem.

Inicie um novo projeto no VS .NET do tipo Windows Application e no formulário form1.vb insira um controle Label e um controle Button conforme o layout abaixo:

 

No evento Click do botão de comando vamos incluir o seguinte código :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

 

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

 

End Sub

 

Perceba que podemos detalhar com certa precisão a seleção da versão do sistema instalada usando as propriedades : Major , Minor  , Build e Revision. 

Rodando o projeto teremos:

Até a próxima dica VB.NET ..


José Carlos Macoratti