猜- Set objWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!//./root/cimv2")
- Set OSInfo = objWMI.ExecQuery("Select * from Win32_OperatingSystem")
- For Each item In OSInfo
- MsgBox item.MUILanguages(0)&vbCrLf&item.Locale _
- &vbCrLf&item.CodeSet _
- &vbCrLf&item.CountryCode
- Next
复制代码
|