VB 6 编程环境,找不到合适实时读取CPU和硬盘温度的案例,如有专家能解决这个问题,并提供源代码,十分感谢!

WMI之类的我已经试过了,用不成。

但有使用C#,调用openhardwaremonitorlib.dll库文件 成功案例。

现有需求要在VB 6 编程环境下,使用openhardwaremonitorlib.dll库文件 ,

解决实时读取CPU和硬盘温度的需求。

回答

wmi其实也是可以的,只是一些主板硬件不支持,另外你既然提到openhardwaremonitorlib.dll,其实你可以用regasm可以把它暴露成com接口,然后vb6以activex dll的方式饮用后可以调用。

帮你搞了一个

看下面的效果:

图片说明

Private Sub Command1_Click()

Dim obj As Object

Set obj = CreateObject("Q1093036Lib.Class1")

Dim s As String

s = obj.GetTemperature()

MsgBox s

End Sub

using System;

using System.Collections.Generic;

using System.Linq;

using System.Text;

using OpenHardwareMonitor;

using OpenHardwareMonitor.Collections;

using OpenHardwareMonitor.Hardware;

using System.Runtime.InteropServices;

namespace Q1093036Lib

{

[ComVisible(true)]

public class Class1

{

[ComVisible(true)]

public string GetTemperature()

{

string s = "";

Computer computer = new Computer();

computer.MainboardEnabled = true;

computer.CPUEnabled = true;

computer.HDDEnabled = true;

computer.RAMEnabled = true;

computer.GPUEnabled = true;

computer.FanControllerEnabled = true;

computer.Open();

foreach (var hardware in computer.Hardware)

{

hardware.Update();

foreach (var sensor in hardware.Sensors)

{

s += sensor.Name + ":" + sensor.Value + "\r\n";

}

}

return s;

}

}

}

留下email,采纳回答,把完整的项目代码给你

其他人如果也需要,可以从 https://download.csdn.net/download/caozhy/12683629 下载

以上是 VB 6 编程环境,找不到合适实时读取CPU和硬盘温度的案例,如有专家能解决这个问题,并提供源代码,十分感谢! 的全部内容, 来源链接: utcz.com/a/37217.html

回到顶部