VB6 获取内存、硬盘、CPU使用率信息

最新推荐文章于 2024-10-03 12:51:12 发布

xjnzhidao

最新推荐文章于 2024-10-03 12:51:12 发布

阅读量3k

点赞数 2

分类专栏： vb 6.0 文章标签： vb6.0 内存硬盘 cpu

本文链接：https://blog.youkuaiyun.com/xjnzhidao/article/details/48105717

版权

本文介绍如何使用VB6编程获取计算机的内存、硬盘和CPU的使用率信息，为系统监控提供基础支持。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Public Function 内存信息() As String
    Set objWMI = GetObject("winmgmts:\\" & "." & "\root\cimv2")
    Set colOS = objWMI.InstancesOf("Win32_OperatingSystem")
    For Each objOS In colOS
        总内存 = Round(objOS.TotalVisibleMemorySize / 1024) & " MB"
        可用内存 = Round(objOS.