VB.Net by API/System.Diagnostics/PerformanceCounter

PerformanceCounter.CategoryName

<source lang="vbnet"> public class Test

  public Shared Sub Main
       Dim PerformanceCounter2 As System.Diagnostics.PerformanceCounter
       PerformanceCounter2 = New System.Diagnostics.PerformanceCounter()
       Console.WriteLine("Category: " & PerformanceCounter2.CategoryName)
       Console.WriteLine("Counter: " & PerformanceCounter2.CounterName)
       Console.WriteLine("Instance: " & PerformanceCounter2.InstanceName)
       Console.WriteLine("Machine: " & Environment.MachineName)
       Console.WriteLine("RawValue: " & PerformanceCounter2.RawValue)
       
  End Sub

End class

 </source>

PerformanceCounter.CounterName

<source lang="vbnet">

public class Test

  public Shared Sub Main
       Dim PerformanceCounter2 As System.Diagnostics.PerformanceCounter
       PerformanceCounter2 = New System.Diagnostics.PerformanceCounter()
       Console.WriteLine("Category: " & PerformanceCounter2.CategoryName)
       Console.WriteLine("Counter: " & PerformanceCounter2.CounterName)
       Console.WriteLine("Instance: " & PerformanceCounter2.InstanceName)
       Console.WriteLine("Machine: " & Environment.MachineName)
       Console.WriteLine("RawValue: " & PerformanceCounter2.RawValue)
       
  End Sub

End class

 </source>

PerformanceCounter.InstanceName

<source lang="vbnet">

public class Test

  public Shared Sub Main
       Dim PerformanceCounter2 As System.Diagnostics.PerformanceCounter
       PerformanceCounter2 = New System.Diagnostics.PerformanceCounter()
       Console.WriteLine("Category: " & PerformanceCounter2.CategoryName)
       Console.WriteLine("Counter: " & PerformanceCounter2.CounterName)
       Console.WriteLine("Instance: " & PerformanceCounter2.InstanceName)
       Console.WriteLine("Machine: " & Environment.MachineName)
       Console.WriteLine("RawValue: " & PerformanceCounter2.RawValue)
       
  End Sub

End class

 </source>