SelectionChange event

Occurs when a selection on the map changes.

Applies to

Objects:  Map, MappointControl


object.SelectionChange(NewSelection, OldSelection)


Part Description
object An expression that evaluates to a Map or MappointControl object.
NewSelection ByVal Object. The newly selected Direction, Location, Pushpin, Shape, or Waypoint object on the map.
OldSelection ByVal Object. The previously selected object on the map.


Do not make this event infinitely recursive by calling itself or causing itself to be called.

Do not create a modal dialog box—including message boxes—during this event.


    Dim WithEvents objApp As MapPoint.Application
  Dim WithEvents objMap As MapPoint.Map

  Private Sub Command1_Click()     Dim objPin As MapPoint.Pushpin     'Add a Pushpin, then select it     Set objPin = objMap.AddPushpin(objMap.FindResults("Seattle, WA")(1))     objPin.Select   End Sub
  Private Sub Form_Load()     'Set up the application     Set objApp = CreateObject("mappoint.application")     Set objMap = objApp.ActiveMap     objApp.Visible = True     objApp.UserControl = True   End Sub
  Private Sub objMap_SelectionChange(ByVal NewSelection As Object, ByVal OldSelection As Object)     NewSelection.Location.GoTo   End Sub

Note  This sample code is specific for use in MapPoint North America; it is for illustration purposes only.