Type property (Direction)
Returns the data type for the Direction object, which is a single line in the driving directions. Read-only GeoDirectionType.
| GeoDirectionType | Value | Description |
|---|---|---|
| geoDirectionBorder |
2
|
Border crossing |
| geoDirectionConstruction |
6
|
Construction update notification (MapPoint North America only) |
| geoDirectionDriving |
1
|
Driving instruction |
| geoDirectionEndOfDay |
4
|
End of day notation |
| geoDirectionFuel |
5
|
Refuel notification |
| geoDirectionOther |
0
|
Other |
| geoDirectionRestBreak |
7
|
Automatic rest break notification |
| geoDirectionStartOfDay |
3
|
Beginning of day notation |
| geoDirectionWarning |
8
|
Warning about timetables, gate access, toll roads, tollbooths, time zones, or restricted turns |
| geoDirectionWaypoint |
9
|
Start point, stop, or end point |
Applies to
Objects: Direction
Syntax
object.Type
Parameters
| Part | Description |
|---|---|
| object | Required. An expression that returns a Direction object. |
Example
Sub DirectionType()
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
'What type is the fifth direction?
MsgBox "Fifth Direction Type: " + CStr(objRoute.Directions.Item(5).Type)
End Sub
Note This sample code is specific for use in MapPoint North America; it is for illustration purposes only.