Public Shared Function CompareExchange ( _
    ByRef location1 As Long, _
    value As Long, _
    comparand As Long _
) As Long

Dim location1 As Long
Dim value As Long
Dim comparand As Long
Dim returnValue As Long

returnValue = Interlocked.CompareExchange(location1, _
    value, comparand)

public static long CompareExchange(
    ref long location1,
    long value,
    long comparand
)

public:
static long long CompareExchange(
    long long% location1, 
    long long value, 
    long long comparand
)

public static function CompareExchange(
    location1 : long, 
    value : long, 
    comparand : long
) : long