Da die Anfrage in letzter Zeit groß ist, wie man denn nun die CPU Temperatur ausliest, mache ich nun diesen Thread auf.
Also ein Verweis auf System.Management und folgenden Code:
Also ein Verweis auf System.Management und folgenden Code:
VB.NET-Quellcode
- Imports System.Management
- Public Class Form1
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Try
- Dim TempSearcher As New Management.ManagementObjectSearcher( _
- "root\WMI", "SELECT * FROM MSAcpi_ThermalZoneTemperature")
- For Each TempSensor As Management.ManagementObject In TempSearcher.Get()
- Dim Temperature As Double = CDbl(TempSensor("CurrentTemperature"))
- Temperature = (Temperature - 2732) / 10.0
- MessageBox.Show(Temperature.ToString & "° C")
- Next
- Catch err As Management.ManagementException
- MessageBox.Show("Fehler: " & err.Message)
- End Try
- End Sub
- End Class