VB 如何获取硬盘温度

代码说明：

应用背景    首先运行VB   6中文版，建立一个标准的exe工程，将窗体命名为frmmain，borderstyle属性设为：3-fixed，caption，属性设置为空；接着添加一个frame控件——“frame1”，caption属性设置为空，再添加picturebox控件pctPrg，前景色为绿色，背景色为浅红色；最后添加一个定时器控件——“timer”，interval设置为100（当然，也可以根据自己的需要设置读取间隔），enabled设置为true，其他的属性采用系统的默认值，调整窗体和控件到适当位置和适当大小即可（参见附图）。关键技术需要说明的是，在内存配置较低的计算机中（比如内存32MB，Windows   98第二版），CPU的占有率是较高的，一般能够达到50%，这可能是由于系统需要CPU进行许多的运算模拟来弥补资源的不足。然而在88MB内存，同样操作系统的机器上，占有率一般只有10%。另外，本文主窗体中定时器运行过程函数中调用的FormatPercent函数是VB   6.0新添加的一个函数，它的作用是将一个表达式转化成百分数。用VB   5.0开发的读者需要采取其他变通方法，以实现监控CPU功能。本程序在Windows   98第二版、VB   6.0中文企业版下测试通过。