HyperlinkField property
Returns or sets the Field object that contains hyperlinks for the specified data set. The HyperlinkType property of the DataSet object must be set to geoHyperlinkField. Read/write.
Applies to
Objects: DataSet
Syntax
object.HyperlinkField
Parameters
Part | Description |
---|---|
object | Required. An expression that returns a DataSet object. |
Example
Sub SetHyperlinkField()
Dim objApp As New MapPoint.Application
Dim objMap As MapPoint.Map
Dim objData As MapPoint.DataSet
Dim objField As MapPoint.Field
'Set up application
objApp.Visible = True
objApp.UserControl = True
Set objMap = objApp.ActiveMap
'Let the user import data with the wizard
'There should be one field named "URL"
Set objData = objMap.DataSets.ShowImportWizard
If objData Is Nothing Then Exit Sub
'Make sure that there is a "URL" field
Set objField = Nothing
For i% = 1 To objData.Fields.Count
If UCase(objData.Fields.Item(i%).Name) = "URL" Then
Set objField = objData.Fields.Item(i%)
Exit For
End If
Next i%
If objField Is Nothing Then
MsgBox "Sorry, there is no field named 'URL'"
Exit Sub
End If
'Set the hyperlink field
Let objData.HyperlinkType = geoHyperlinkField
Let objData.HyperlinkField = objField
MsgBox "The hyperlink field has been set to " & objField.Name
End Sub