Is there any way to disable popup menu at runtime in Mappoint 2002? The menu which apears when right click mouse button.

I have tried this code, but it does not work

mpCtrl1 is my map control

Private Sub mpCtrl1_BeforeClick(ByVal Button As Long, _
ByVal Shift As Long, ByVal X As Long, _
ByVal Y As Long, Cancel As Boolean)
If Button = 2 Then
Cancel = True
End If
End Sub