Check Windows Version

[SIMIN]

Hello,
I want to detect if my application is running under XP, 2003 or Vista? (I know just one of these, no ther OS)
How can I detect the current version?
I have the following information but don't know how should I compare them?

Dim MyVersion As Version = Environment.OSVersion.Version
Dim XPVersion As New Version(5, 1, 0, 0)
Dim ServerVersion As New Version(5, 2, 0, 0)
Dim VistaVersion As New Version(6, 0, 0, 0)

 

[PlausiblyDamp]

The version class has a CompareTo method you could use. However http://www.codeproject.com/KB/system/osversion.aspx might be worth a look as somebody else has done all the hard work

 

[SIMIN]

To make it simple, can I say that this code is correct? I just want to detect Windows Version that's enough:

If Environment.OSVersion.Version.Major = 5 Then
    If Environment.OSVersion.Version.Minor = 1 Then
        'XP
    End If
    If Environment.OSVersion.Version.Minor = 2 Then
        '2003
    End If
End If
If Environment.OSVersion.Version.Major = 6 Then
    'Vista
End If