获取CPU数量:
Private Type SYSTEM_INFO
dwOemID As Long
dwPageSize As Long
lpMinimumApplicationAddress As Long
lpMaximumApplicationAddress As Long
dwActiveProcessorMask As Long
dwNumberOrfProcessors As Long
dwProcessorType As Long
dwAllocationGranularity As Long
dwReserved As Long
End Type
Private Declare Sub GetSystemInfo Lib "kernel32" (lpSystemInfo As SYSTEM_INFO)
Dim SysInfo As SYSTEM_INFO
GetSystemInfo SysInfo
MsgBox SysInfo.dwNumberOrfProcessors
文章来源于lcx.cc:【VB技巧】VB获取CPU/处理器的数量/个数
相关推荐: 【漏洞】Microsoft IE CSS处理跨域信息泄露
Microsoft IE CSS处理跨域信息泄露漏洞,BUGTRAQ ID: 42993。 Internet Explorer是Windows操作系统中默认捆绑的web浏览器。 Internet Explorer允许包含跨来源的内容,…
- 左青龙
- 微信扫一扫
- 右白虎
- 微信扫一扫
评论