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).