得到计算机操作系统版本信息,VB.NET源代码编写Environment.OSVersion.ToString

说的也是没有几行代码

那么大个头,就一行话,我直接贴出来吧,改进了. Dim strings As String = System.Environment.OSVersion.ToString Dim exp As New Regex("NT\s(\d+\.\d+)") Dim strMatch As Match Dim osVer As String strMatch = exp.Match(strings, 2) If strMatch.Success = True Then

效果一般，不过附带一个勾月桌面管理系统