Description: OSVersion = CSng(GetOSVersion.osvOSVerMajor & "." & GetOSVersion.osvOSVerMinor)
Select Case GetOSVersion.osvOSName
Case 0 Windows 32s
OS = "Win32"
Case 1 Windows 95/98
Select Case OSVersion
Case 4: OS = "Win 95"
Case 4.1: OS = "Win 98"
Case 4.9: OS = "Wim Me"
End Select
Case 2 Windows NT
Select Case OSVersion
Case 4: OS = "Win NT"
Case 5#: OS = "Win 2000"
Case 5.1: OS = "Win XP"
End Select
End Select
To Search:
File list (Check if you may need any files):
(没有文件，原文件不完全或已损坏或有密码)
Download