Follow method
Executes the specified hyperlink jump in a Pushpin balloon.
Applies to
Objects: Hyperlink
Syntax
object.Follow
Parameters
Part | Description |
---|---|
object | Required. An expression that returns a Hyperlink object. |
Example
Sub FollowHyperlink()
Dim objApp As New MapPoint.Application
Dim objMap As MapPoint.Map
Dim objPin As MapPoint.Pushpin
'Set up the application
Set objMap = objApp.ActiveMap
objApp.Visible = True
objApp.UserControl = True
'Add a Pushpin to the map
Set objPin = objMap.AddPushpin(objMap.FindResults("Seattle, WA")(1))
objPin.BalloonState = geoDisplayBalloon
'Create a hyperlink for the Pushpin data set and go to that link
objMap.DataSets(1).HyperlinkType = geoHyperlinkCalculated
objMap.DataSets(1).HyperlinkCalculated = "https://www.microsoft.com/mappoint"
objPin.Hyperlink.Follow
End Sub
Note This sample code is specific for use in MapPoint North America; it is for illustration purposes only.