vba - 在 VBA 中获取当前内存配置的最佳方法

我正在尝试获取当前用户的 RAM 配置。我想使用 VBA 来查找它，然后将它存储在一个表中。我需要芯片数量以及每个芯片上的 RAM 数量。是否可以使用 VBA 以编程方式查找？我需要使用 Windows 脚本宿主吗？

最佳答案

您可以使用 WMI 执行此操作:

Dim devlist as object
Dim dev as object
Dim totalRAM as long
Dim numChips as long
Set devlist = GetObject("winmgmts:{impersonationLevel=impersonate}").ExecQuery("SELECT * FROM Win32_LogicalMemoryConfiguration")
numChips = 0
For Each dev In devlist
    numChips = numChips + 1
    totalRAM = totalRAM + CLng(dev.TotalPhysicalMemory)
Next
devlist = Nothing
MsgBox "RAM: NumChips = " & numChips & ", Total = " & (totalRAM / 1024) & "MB"

关于vba - 在 VBA 中获取当前内存配置的最佳方法，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/701587/