C# Signature:

[DllImport("kernel32.dll", SetLastError=true)]
static extern bool QueryPerformanceCounter(out long lpPerformanceCount);

VB.NET Signature:

<DllImport("kernel32.dll", SetLastError:=True)> _
Shared Function QueryPerformanceCounter(ByRef lpPerformanceCount As Long) As Boolean
End Function

User-Defined Types:

None.

Notes:

Arguably one of the most frequently used and most important PInvokes used, this is the only way in .NET to get a high performance counter for measurement, unique seeding of Random Variables (although you could perhaps transfor a GUID to a numberic equivalent), and in general what this global consiltant would consider a 'must include' in almost any application where Instrumentation is a must.

Tips & Tricks:

For this particular method, execution time is often critical. Security can be traded for additional speed by applying the SuppressUnmanagedCodeSecurity attribute to the method declaration. This will prevent the runtime from doing a security stack walk at runtime.

[DllImport("kernel32.dll"),SuppressUnmanagedCodeSecurity]
static extern bool QueryPerformanceCounter(out long lpPerformanceCount);

If you are interested in this API you are probably also looking for the QueryPerformanceFrequency API.

Sample Code:

Imports System.Runtime.InteropServices
Imports System.Security

Friend Enum TimeState
    Started
    Stopped

End Enum

Public Class HighResTimer

    <DllImport("kernel32.dll"), SuppressUnmanagedCodeSecurity()> _
    Private Shared Function QueryPerformanceCounter(ByRef lpPerformanceCount As Long) As Boolean
    End Function

    <DllImport("kernel32.dll"), SuppressUnmanagedCodeSecurity()> _
    Private Shared Function QueryPerformanceFrequency(ByRef lpPerformanceFreq As Long) As Boolean
    End Function

    Private Shared freq As Long
    Shared Sub New()
    If Not QueryPerformanceFrequency(freq) Then
        Throw New System.ComponentModel.Win32Exception
    End If
    End Sub

    Private startTime, endTime As Long
    Private _duration As Double
    Private state As TimeState = TimeState.Stopped

    Public Sub Start()
    If state = TimeState.Started Then
        Throw New ApplicationException("Cant' start, already started")
    End If
    state = TimeState.Started
    QueryPerformanceCounter(startTime)
    End Sub

    Public Function [Stop]() As Double
    QueryPerformanceCounter(endTime)
    If state = TimeState.Stopped Then
        Throw New ApplicationException("Cant' start, already started")
    End If
    state = TimeState.Stopped
    _duration = ((endTime - startTime) / freq)
    Return _duration
    End Function

    Public ReadOnly Property Duration() As Double
    Get
        If state = TimeState.Started Then
        Throw New ApplicationException("Must call Stop() first")
        End If
        Return _duration
    End Get
    End Property

End Class

Alternative Managed API:

Please edit this page!

Do you have...

• helpful tips or sample code to share for using this API in managed code?
• corrections to the existing content?
• variations of the signature you want to share?
• additional languages you want to include?

Select "Edit This Page" on the right hand toolbar and edit it! Or add new pages containing supporting types needed for this API (structures, delegates, and more).