Difference between revisions of "Windows version"
From HashVB
(GetVersion) |
m (Split 95, 98, and ME) |
||
(9 intermediate revisions by 2 users not shown) | |||
Line 1: | Line 1: | ||
+ | {{VB6}} | ||
There is a function in windows that will tell you what version it is running called, unsurprisingly, GetVersion() | There is a function in windows that will tell you what version it is running called, unsurprisingly, GetVersion() | ||
Line 14: | Line 15: | ||
The values for each version of windows are as follows: | The values for each version of windows are as follows: | ||
{| border="1" | {| border="1" | ||
− | | Windows NT 3.51 | + | | Windows NT 3.51 || 3 |
|- | |- | ||
− | | Windows 3.1 | + | | Windows 3.1 || 3.1 |
|- | |- | ||
− | | Windows NT 4 | + | | Windows NT 4 || 4 |
|- | |- | ||
− | | Windows 95 | + | | Windows 95 || 4 |
|- | |- | ||
− | | Windows | + | | Windows 98 || 4.1 |
|- | |- | ||
− | | Windows XP | + | | Windows ME || 4.9 |
+ | |- | ||
+ | | Windows 2000 || 5 | ||
+ | |- | ||
+ | | Windows XP || 5.01 (This is not 5.1 as [http://www.jrsoftware.org/iskb.php?why501 Microsoft changed the format]) | ||
+ | |- | ||
+ | | Server 2003 &<br />Windows XP x64 || 5.02 | ||
+ | |- | ||
+ | | Windows Vista || 6 | ||
+ | |- | ||
+ | | Windows 7 || 6.01 (See the comment above) | ||
|} | |} | ||
===See also=== | ===See also=== | ||
− | * | + | * {{API link|GetVersion}} |
* [http://msdn.microsoft.com/library/en-us/sysinfo/base/getversion.asp MSDN page] | * [http://msdn.microsoft.com/library/en-us/sysinfo/base/getversion.asp MSDN page] |
Latest revision as of 09:55, 22 July 2009
This article is based on Visual Basic 6. Find other Visual Basic 6 articles. |
There is a function in windows that will tell you what version it is running called, unsurprisingly, GetVersion()
The data this returns is not quite as friendly as it could be, so this function converts it to a nice usable value:
Private Declare Function GetVersion Lib "kernel32" () As Long Public Function WindowsVersion() As Single Dim Version As Long Version = GetVersion() WindowsVersion = (Version And &HFF&) + (((Version And &HFF00&) \ &H100)) / 100 End Function
The values for each version of windows are as follows:
Windows NT 3.51 | 3 |
Windows 3.1 | 3.1 |
Windows NT 4 | 4 |
Windows 95 | 4 |
Windows 98 | 4.1 |
Windows ME | 4.9 |
Windows 2000 | 5 |
Windows XP | 5.01 (This is not 5.1 as Microsoft changed the format) |
Server 2003 & Windows XP x64 |
5.02 |
Windows Vista | 6 |
Windows 7 | 6.01 (See the comment above) |