Code compile, but objpin method or property don't work.
I want to use this code to get Pushpin user click.

Here's the complete VB code:

Dim objPin As MapPoint.Pushpin

' Check if the user double-clicked on a pushpin
If Not MPMap.ActiveMap.Selection Is Nothing Then
If TypeOf MPMap.ActiveMap.Selection Is MapPoint.Pushpin Then

Set objPin = MPMap.ActiveMap.Selection

' Do whatever with the pushpin...

' We've handled this double-click
Cancel = True

End If
End If
End Sub