32 비트 Windows 버전을 사용 중인 확인하는 방법

기술 자료 번역 기술 자료 번역
기술 자료: 189249 - 이 문서가 적용되는 제품 보기.
모두 확대 | 모두 축소

이 페이지에서

요약

응용 프로그램이 컴퓨터에서 실행하는 운영 체제에 따라 다르게 작업을 수행해야 할 수도 있습니다. 이 문서에서는, 예를 들어, Microsoft Windows 95, Microsoft Windows 98, Microsoft Window NT 3.51, Microsoft Windows NT 4.0, Microsoft Windows 2000 및 Windows XP 사이에 구분하는 방법을 보여 줍니다.

Win32 GetVersionEx 함수는 프로그램이 운영 체제 식별하는 데 사용할 수 있는 정보를 반환합니다. 주 버전과 부 수정 번호와 플랫폼 식별자 간에 이러한 값이 있습니다. Windows 98 도입과 함께 지금 사용 중인 Windows 버전을 확인할 수 있는 더 복잡한 논리 확인이 수행됩니다. 아래 목록을 GetVersionEx 함수에 의해 채워진 OSVERSIONINFO 구조를 평가하는 데 필요한 데이터를 제공합니다.
표 축소표 확대
Windows 95Windows 98Windows MeWindows NT 4.0Windows 2000Windows XP
PlatformID 1 1 1 2 2 2
주 버전 4 4 4 4 5 5
부 버전 0 10 90 0 0 1

추가 정보

단계별 예제

  1. Visual Basic에서 새 표준 EXE 프로젝트를 시작하십시오. 기본적으로 Form1이 만들어집니다.
  2. 프로젝트 메뉴에서 표준 모듈 프로젝트에 추가하십시오.
  3. Insert the following code into Module1:
          Public Declare Function GetVersionExA Lib "kernel32" _
                   (lpVersionInformation As OSVERSIONINFO) As Integer
     
                Public Type OSVERSIONINFO
                   dwOSVersionInfoSize As Long
                   dwMajorVersion As Long
                   dwMinorVersion As Long
                   dwBuildNumber As Long
                   dwPlatformId As Long
                   szCSDVersion As String * 128
                End Type
     
                Public Function getVersion() As String
                   Dim osinfo As OSVERSIONINFO
                   Dim retvalue As Integer
     
                   osinfo.dwOSVersionInfoSize = 148
                   osinfo.szCSDVersion = Space$(128)
                   retvalue = GetVersionExA(osinfo)
     
                   With osinfo
                   Select Case .dwPlatformId
     
                    Case 1
                    
                        Select Case .dwMinorVersion
                            Case 0
                                getVersion = "Windows 95"
                            Case 10
                                getVersion = "Windows 98"
                            Case 90
                                getVersion = "Windows Millennium"
                        End Select
        
                    Case 2
                        Select Case .dwMajorVersion
                            Case 3
                                getVersion = "Windows NT 3.51"
                            Case 4
                                getVersion = "Windows NT 4.0"
                            Case 5
                                If .dwMinorVersion = 0 Then
                                    getVersion = "Windows 2000"
                                Else
                                    getVersion = "Windows XP"
                                End If
                        End Select
        
                    Case Else
                       getVersion = "Failed"
                End Select
     
                   End With
                End Function
    
    					
  4. 다음 코드 줄을 Form1의 Load 이벤트는 추가:
    MsgBox GetVersion()
    					
  5. 프로젝트를 실행한 다음 메시지 상자에 올바른 Windows 버전이 표시됩니다.

참조

자세한 내용은 Microsoft 기술 자료의 다음 문서를 참조하십시오.
92936Windows 3.1 버전 번호를 GetVersion 함께 VB에서 방법

속성

기술 자료: 189249 - 마지막 검토: 2004년 9월 3일 금요일 - 수정: 3.0
본 문서의 정보는 다음의 제품에 적용됩니다.
  • Microsoft Visual Basic 5.0 Learning Edition
  • Microsoft Visual Basic 6.0 Learning Edition
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition
  • Microsoft Visual Basic Enterprise Edition for Windows 6.0
  • Microsoft Visual Basic 4.0 Standard Edition
  • Microsoft Visual Basic 4.0 Professional Edition
  • Microsoft Visual Basic for Applications 5.0
키워드:?
kbmt kbhowto KB189249 KbMtko
기계 번역된 문서
중요: 본 문서는 전문 번역가가 번역한 것이 아니라 Microsoft 기계 번역 소프트웨어로 번역한 것입니다. Microsoft는 번역가가 번역한 문서 및 기계 번역된 문서를 모두 제공하므로 Microsoft 기술 자료에 있는 모든 문서를 한글로 접할 수 있습니다. 그러나 기계 번역 문서가 항상 완벽한 것은 아닙니다. 따라서 기계 번역 문서에는 마치 외국인이 한국어로 말할 때 실수를 하는 것처럼 어휘, 구문 또는 문법에 오류가 있을 수 있습니다. Microsoft는 내용상의 오역 또는 Microsoft 고객이 이러한 오역을 사용함으로써 발생하는 부 정확성, 오류 또는 손해에 대해 책임을 지지 않습니다. Microsoft는 이러한 문제를 해결하기 위해 기계 번역 소프트웨어를 자주 업데이트하고 있습니다.

피드백 보내기

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com