Share via


Highlight property

Returns or sets whether a Location or Pushpin object is highlighted. True if highlighted. To highlight a Location object, its IsHighlightable property must be True. Read/write Boolean.

Applies to

Objects: Location, Pushpin

Syntax

object.Highlight

Parameters

Part

Description

object

Required. An expression that returns a Location or Pushpin object.

Example

  Sub HighlightPushpin()

  Dim objApp As New MapPoint.Application
  Dim objLoc As MapPoint.Location
  Dim objPin As MapPoint.Pushpin

  'Set up application and get a Location object
  objApp.Visible = True
  objApp.UserControl = True
  Set objLoc = objApp.ActiveMap.GetLocation(0, 0)

  'Create a Pushpin and zoom to it
  Set objPin = objApp.ActiveMap.AddPushpin(objLoc)
  Set objApp.ActiveMap.Location = objPin.Location

  'Highlight the Pushpin
  objPin.Highlight = True

  End Sub