Try this:
Import Namespace System.Diagnostics
' ... Dim cpu as New PerformanceCounter() With cpu .CategoryName = "Processor" .CounterName = "% Processor Time" .InstanceName = "_Total" End With ' ... myLabel.Text = cpu.NextValue()
The site is legit. But there is not a 100% guarantee that the keys will work, so you have to take a risk. G2A pays you back/gives you a new key if you have been scammed and have G2A Shield on.