2010-07-22 51 views
2

我使用VB .Net 2.0。我知道我可以使用如何檢測用戶正在運行的操作系統?

System.Environment.OSVersion 

誰能告訴我,如果有一個名單的地方在那裏我能找到什麼,產生了不同的操作系統版本檢測操作系統。

特別是我試圖檢測用戶是否運行Windows 7 64位。

+0

複製的文本http://stackoverflow.com/questions/860459/determine-os-using-the-environment-osversion-object-c – EndangeredMassa 2010-07-22 13:47:42

回答

0

用途:

Environment.OSVersion.ToString() 

這將返回值,如:

"Microsoft Windows NT 5.0.2195.0" 

Here is a link如何從版本解壓OS /版本號。

或者你可以use this function

Public Function GetOSVersion() As String 
    Select Case Environment.OSVersion.Platform 
     Case PlatformID.Win32S 
      Return "Win 3.1" 
     Case PlatformID.Win32Windows 
      Select Case Environment.OSVersion.Version.Minor 
       Case 0 
        Return "Win95" 
       Case 10 
        Return "Win98" 
       Case 90 
        Return "WinME" 
       Case Else 
        Return "Unknown" 
      End Select 
     Case PlatformID.Win32NT 
      Select Case Environment.OSVersion.Version.Major 
       Case 3 
        Return "NT 3.51" 
       Case 4 
        Return "NT 4.0" 
       Case 5 
        Select Case _ 
         Environment.OSVersion.Version.Minor 
         Case 0 
          Return "Win2000" 
         Case 1 
          Return "WinXP" 
         Case 2 
          Return "Win2003" 
        End Select 
       Case 6 
        Return "Vista/Win2008Server" 
       Case Else 
        Return "Unknown" 
      End Select 
     Case PlatformID.WinCE 
      Return "Win CE" 
    End Select 
End Function 
0

最全面我找到的解決方案是PJ Naughter的DtWinver類。它可以區分Windows的各種版本(簡化版,家庭基礎版,家庭高級版,專業版,企業版等),這些功能可能是您不需要的功能。

0

這爲我工作,而不是檢查版本號的,這僅僅檢查是由Windows操作系統

返回獲取操作系統名稱

 Dim machineOSPlatform as String 
     If My.Computer.Info.OSFullName.Contains("7") Then 
      machineOSPlatform = "Windows 7" 
     ElseIf My.Computer.Info.OSFullName.Contains("XP") Then 
      machineOSPlatform = "Windows XP" 
     ElseIf My.Computer.Info.OSFullName.Contains("8") Then 
      machineOSPlatform = "Windows 8" 
     ElseIf My.Computer.Info.OSFullName.Contains("Vista") Then 
      machineOSPlatform = "Windows Vista" 
     ElseIf My.Computer.Info.OSFullName.Contains("2008") Then 
      machineOSPlatform = "Windows 2008 Server" 
     ElseIf My.Computer.Info.OSFullName.Contains("2012") Then 
      machineOSPlatform = "Windows 2012 Server" 
     ElseIf My.Computer.Info.OSFullName.Contains("2003") Then 
      machineOSPlatform - "Windows 2003 Server" 
     Else 
      machineOSPlatform = "Unknown OS" 
     End If 

http://www.vbforums.com/showthread.php?676340-how-can-i-get-visual-basic-to-show-what-os-your-running