Cómo acceder a la temperatura de la CPU en VB

Si usted está construyendo un sencillo programa de estadísticas de hardware, el primer lugar para buscar en es la referencia de Windows (WMI), donde encontrará una gran cantidad de consultas ordenadas que puede realizar en la interfaz para averiguar muchas cosas sobre su sistema. Puede encontrar la temperatura de sus CPU mediante el envío de una consulta a la WMI para "MSAcpi_ThermalZoneTemperature" y buscando el valor "CurrentTemperature". Esto es más fácil decirlo que hacerlo, sin embargo, así que asegúrese de tocar para arriba en sus habilidades de programación.

Instrucciones

1 Abre un proyecto de formulario de Visual Basic de Windows y lo llaman algo que le gustaría.

2 Crear un botón seleccionando el elemento botón en su caja de herramientas y arrastrando un cuadro a través de su formulario que cubre el área que desea que el botón que aparezca en.

3 Haga doble clic en el botón que acaba de crear para tomar a sí mismo a su función evento click en vista de código.

4 Declarar un nuevo Buscador objeto de gestión dentro del evento de clic y pasar sus parámetros de construcción como la clase WMI de raíz con una consulta para "MSAcpi_ThermalZoneTemperature." Puede hacerlo de esta manera:

Dim s As New System.Management.ManagementObjectSearcher (_
"Root / WMI", "SELECT * FROM MSAcpi_ThermalZoneTemperature")

5 Recorrer el buscador que ha creado y haga un valor temporal en la iteración para mostrar el valor. La temperatura de la CPU va a ser mostrado en un número de 0,1 unidades de Kelvin. Por ejemplo, si la temperatura de la CPU es 27455, esto puede ser interpretado como 2745.5 grados Kelvin. Usted tendrá que convertir la temperatura a la unidad que desea visualizar. El siguiente ejemplo hace la iteración y muestra la temperatura de la CPU en grados Celsius:

Para cada Q Como ManagementObject En s.Get ()

Dim tmp As Double = CDbl(q("CurrentTemperature")
tmp = (tmp -- 2732) / 10.0
MessageBox.Show(tmp.ToString)

Siguiente

Consejos y advertencias

• No se olvide de convertir la temperatura a una cadena, ya que es un valor "doble", y tales valores no se puede demostrar en el marco de un cuadro de mensaje.
• La siguiente fórmula convierte el valor a Fahrenheit, en caso de que no desea que la temperatura en grados Celsius: tmp = ((TMP - 2732) / 10,0) * (9/5) + 32
• Si encuentra las instrucciones para ser algo confuso, es probable que no entienda los conceptos básicos de Visual Basic. Echa un vistazo a la sección de recursos para un tutorial que le permitirá estar en su camino.