Share via


Location property (Direction)

Returns the Location object that represents the best map view of the part of the route represented by the particular direction. Read-only.

Applies to

Objects:  Direction

Syntax

object.Location

Parameters

Part Description
object Required. An expression that returns a Direction object.

Example

    Sub ZoomToFourthDirection()

  Dim objApp As New MapPoint.Application   Dim objMap As MapPoint.Map   Dim objRoute As MapPoint.Route
  'Set up the application   Set objMap = objApp.ActiveMap   Set objRoute = objMap.ActiveRoute   objApp.Visible = True   objApp.UserControl = True
  'Add route stops and calculate the route   objRoute.Waypoints.Add objMap.FindResults("Seattle, WA").Item(1)   objRoute.Waypoints.Add objMap.FindResults("Redmond, WA").Item(1)   objRoute.Calculate
  'Zoom map into fourth direction segment   Set objMap.Location = objRoute.Directions.Item(4).Location
  End Sub

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