GetVersionEx

VB聲明

Declare Function GetVersionEx Lib "kernel32" Alias "GetVersionExA" (ByVal lpVersionInformation As OSVERSIONINFO) As Long

說明

在一個OSVERSIONINFO結構中載入與平台和操作系統有關的版本信息

返回值

Long，非零表示成功，零表示失敗

參數表

參數 lpVersionInformation

類型及說明

OSVERSIONINFO，用於裝載版本信息的結構。在正式調用函數之前，必須先將這個結構的dwOSVersionInfoSize欄位設為結構的大小（148）

Type OSVERSIONINFO

dwOSVersionInfoSize As Long //初始化為結構的大小

dwMajorVersion As Long//系統主版本號

dwMinorVersion As Long//系統次版本號

dwBuildNumber As Long //系統構建號

dwPlatformId As Long //系統支持的平台(詳見附1)

szCSDVersion As String * 128 //系統支持的平台

End Type

附1：dwPlatformId的值：

VER_PLATFORM_WIN32s (Win32s),

VER_PLATFORM_WIN32_WINDOWS (Windows 95/Windows 98),

VER_PLATFORM_WIN32_NT (Windows NT/Windows 2000),

VER_PLATFORM_WIN32_CEHH (Windows CE).