Sistema operacional de verificação vb.net

    Dim osVer As Version = Environment.OSVersion.Version

    If osVer.Major = 6 And osVer.Minor = 1 Then
        Console.WriteLine("win7!!")
    End If
Helpful Hyena