PublicFunctionGetCPUTemp()AsDouble'cpu温度检测 DimiAsInteger DimmCPUAsVariant DimuAsVariant DimsAsString SetmCPU=GetObject("WINMGMTS:{impersonationLevel=impersonate}!root\wmi").ExecQuery("SELECTCurrentT