[VB.NET] temperatura CPU

[bmw]

ciao a tutti, sono alle prime armi con visual basic .net e sto provando a leggere la temperatura delle CPU. Ho scritto questo codice ma mi ritorna sempre un valore altissimo circa 3330.
In tepria dovrebbe essere in restituire il valore in gradi Kelvin, ma anche convertendolo in gradi Celsius resta comunque un valore altissimo....

    Private sistema As ManagementObjectSearcher
    Private objManagment As ManagementObject

    Private temperaturaCpu As Double


    Public Sub New()
        Dim scope As String = "root\WMI"
        Dim query As String = "select * from MSAcpi_ThermalZoneTemperature"
        sistema = New ManagementObjectSearcher(scope, query)
        For Each objManagment In sistema.Get
            temperaturaCpu = objManagment("CurrentTemperature")
            Console.Write(objManagment("CurrentTemperature") & vbNewLine)
            
        Next

     End Sub 

Qualcuno sa darmi una mano o ha un po di codice d'esempio ?? grazie...