Guardando su chrome ho visto alcuni codici per fare tale programma , ma quando lo avvio mi da sempre la stessa temperatura , come è possibile ?
grazie .
codice:
codice:
Try
Dim searcher As New ManagementObjectSearcher("root\WMI", "SELECT * FROM MSAcpi_ThermalZoneTemperature")
For Each queryObj As ManagementObject In searcher.Get()
Dim temp As Double = CDbl(queryObj("CurrentTemperature"))
temp = (temp - 2732) / 10.0
Label1.Text = temp.ToString
Next
Catch ex As ManagementException
MessageBox.Show(ex.Message)
End Try