Como determinar a versão do Windows usando o Visual Basic .NET ou Visual Basic 2005

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 304289
Para obter uma Microsoft Visual translation from VPE for Csharp .NET versão deste artigo, consulte 304283.
Para uma versão deste artigo do Microsoft Visual C++. NET, consulte 307394.
Para uma versão deste artigo do Microsoft Visual Basic 6.0, consulte 189249.

NESTA TAREFA

Sumário
Este artigo passo a passo demonstra como determinar qual sistema operacional está em uso no sistema onde seu aplicativo está sendo executado. Este artigo faz distinção entre o Microsoft Windows 95, Microsoft Windows 98, Microsoft Windows 98 Second Edition, Microsoft Windows Millennium Edition, Microsoft Windows NT 3.51, Microsoft Windows NT 4.0, Microsoft Windows 2000, Microsoft Windows XP e Microsoft Windows Server 2003.

back to the top

Requisitos

  • Microsoft Visual Basic .NET ou Microsoft Visual Basic 2005
  • Compreensão de nível intermediário de programação Visual Basic
back to the top

Obter os dados de versão do Windows

Para determinar o sistema operacional que está sendo executado em um sistema, você deve obter os seguintes dados:

O Windows 95Windows 98Windows MeWindows NT 4.0Windows 2000Windows XPWindows Server 2003
PlatformID 1 1 1 2 2 2 2
Versão principal 4 4 4 4 5 5 5
Versão secundária 0 10 90 0 0 1 2

Observação : Embora o código neste artigo procura em todas as versões de 32 bits do Windows, Windows 95 e Windows NT 3.51 não oferecem suporte Microsoft Visual Studio .NET ou o common language runtime.

back to the top

Obter as informações de Brazilian OS

O namespace System contém uma classe chamada sistema operacional . As propriedades para a classe de sistema operacional fornecem as informações necessárias sobre o sistema operacional que está em uso. A propriedade OSVersion da classe System.Environment retorna um objeto de sistema operacional .
Private osInfo As OperatingSystemosInfo = OSVersion				
back to the top

Determinar a plataforma

A primeira etapa na avaliação lógica das informações do sistema operacional é para determinar qual plataforma está em uso. Você pode utilizar a propriedade PlatformID da classe de sistema operacional para determinar qual plataforma está em uso.

Por exemplo, o valor da propriedade Win32Windows enumerado indica um dos seguintes sistemas operacionais:
  • O Windows 95
  • Windows 98
  • Windows 98 Second Edition
  • Windows Me
Da mesma forma, a propriedade WinNT indica um dos seguintes sistemas operacionais:
  • Windows NT 3.51
  • Windows NT 4.0
  • Windows 2000
  • Windows XP
  • Windows Server 2003
Select Case .Platform    Case .Platform.Win32Windows        'Code to determine specific version of Windows 95, Windows 98,         'Windows 98 Second Edition, or Windows Me.    End Select    Case .Platform.Win32NT         'Code to determine specific version of Windows NT 3.51, Windows NT 4.0,         'Windows 2000, Windows XP or Windows Server 2003.    End Select End Select				
back to the top

Determinar a versão específica do Windows 95, Windows 98, Windows 98 Second Edition ou Windows Me

Se você determinar que a plataforma é o Windows 95, Windows 98, Windows 98 Second Edition ou Windows Me, você pode analisar o principal ou a versão secundária para determinar a versão específica.
'Platform is Windows 95, Windows 98, Windows 98 Second Edition, or Windows Me.Case .Platform.Win32Windows    Select Case (.Version.Minor)        Case 0            getVersion = "Windows 95"        Case 10            If .Version.Revision.ToString() = "2222A" Then                getVersion = "Windows 98 Second Edition"            Else                getVersion = "Windows 98"            End If        Case 90                getVersion = "Windows Me"     End Select				
back to the top

Determinar a versão específica do Windows NT, Windows 2000, Windows XP ou Windows Server 2003

Se você determinar que a plataforma é Windows NT 3.51, Windows NT 4.0, Windows 2000, Windows XP ou Windows Server 2003, você pode analisar o principal ou a versão secundária para determinar a versão específica.
'Platform is Windows NT 3.51, Windows NT 4.0, Windows 2000, Windows XP or Windows Server 2003.Case .Platform.Win32NT    Select Case (.Version.Major)        Case 3            getVersion = "Windows NT 3.51"        Case 4            getVersion = "Windows NT 4.0"        Case 5            Select Case (.Version.Minor)                Case 0                    getVersion = "Windows 2000"                Case 1                    getVersion = "Windows XP"                Case 2                    getVersion = "Windows Server 2003"            End Select        Case Else            getVersion = "Failed"    End Select				
back to the top

Criar o exemplo

As etapas a seguir criar um cenário de teste que demonstra essa funcionalidade:
  1. No Visual Studio .NET ou no Visual Studio 2005, abra um novo aplicativo console Visual Basic. A janela de código para Module1.vb abre por padrão.
  2. Substituir todo o código na janela do editor de código Module1.vb com o seguinte código:
    Option Strict OnImports System.EnvironmentModule Module1    Private osInfo As OperatingSystem    Sub Main()        Console.WriteLine(getVersion())    End Sub    Public Function getVersion() As String        osInfo = OSVersion        With osInfo            Select Case .Platform                Case .Platform.Win32Windows                    Select Case (.Version.Minor)                        Case 0                            getVersion = "Windows 95"                        Case 10                            If .Version.Revision.ToString() = "2222A" Then                                getVersion = "Windows 98 Second Edition"                            Else                                getVersion = "Windows 98"                            End If                        Case 90                            getVersion = "Windows Me"                    End Select                Case .Platform.Win32NT                    Select Case (.Version.Major)                        Case 3                            getVersion = "Windows NT 3.51"                        Case 4                            getVersion = "Windows NT 4.0"                        Case 5                            Select Case (.Version.Minor)                                Case 0                                    getVersion = "Windows 2000"                                Case 1                                    getVersion = "Windows XP"                                Case 2                                    getVersion = "Windows Server 2003"                            End Select                        Case Else                            getVersion = "Failed"                    End Select            End Select        End With    End FunctionEnd Module					
  3. Pressione a combinação de teclas CTRL + F5 para executar o aplicativo. Observe que a versão do Windows é exibido na janela do console.
back to the top

Aviso: este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 304289 - Última Revisão: 12/06/2006 23:18:59 - Revisão: 3.3

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbmt kbvs2005applies kbvs2005swept kbproperties kbhowtomaster KB304289 KbMtpt
Comentários