MapForums

Distance Method
Returns the distance between the start point and end point in the current units.

Syntax
object.Distance (StartLocation, EndLocation) 

Parameters
StartLocation (Location object) 
Start point of a route.  
EndLocation (Location object) 
End point of a route.  
Result (Double) 
Returns the distance between the start point and end point. 
Example
Dim objApp As New MapPoint.Application
Dim objMap As MapPoint.Map
Dim objLoc(1 To 2) As MapPoint.Location
Dim dblDistance As Double

Set objMap = objApp.NewMap

'Get two known locations
Set objLoc(1) = objMap.GetLocation(47.75399, -121.97436, 100) 'Seattle, WA
Set objLoc(2) = objMap.GetLocation(47.6779, -122.11032, 100) 'Redmond, WA

'Retrieve the distance
MsgBox objMap.Distance(objLoc(1), objLoc(2))