textbox-hyperlink-property-access.md

title	keywords	f1_keywords	ms.prod	api_name	ms.assetid	ms.date
TextBox.Hyperlink Property (Access)	vbaac10.chm11037	vbaac10.chm11037	access	Access.TextBox.Hyperlink	a5d80cd4-d03d-41ea-9394-214537dd6c8c	06/08/2017

TextBox.Hyperlink Property (Access)

You can use the Hyperlink property to return a reference to a Hyperlink object. You can use the Hyperlink property to access the properties and methods of a control's hyperlink. Read-only.

Syntax

expression. Hyperlink

expression A variable that represents a TextBox object.

Example

The CreateHyperlink procedure in the following example sets the hyperlink properties for a command button, label, or image control to the address and subaddress values passed to the procedure. The address setting is an optional argument, because a hyperlink to an object in the current database uses only the subaddress setting, To try this example, create a form with two text box controls ( txtAddress and txtSubAddress) and a command button ( cmdFollowLink) and paste the following into the Declarations section of the form's module:

Private Sub cmdFollowLink_Click() 
 CreateHyperlink Me!cmdFollowLink, Me!txtSubAddress, _ 
 Me!txtAddress 
End Sub 
 
Sub CreateHyperlink(ctlSelected As Control, _ 
 strSubAddress As String, Optional strAddress As String) 
 Dim hlk As Hyperlink 
 Select Case ctlSelected.ControlType 
 Case acLabel, acImage, acCommandButton 
 Set hlk = ctlSelected.Hyperlink 
 With hlk 
 If Not IsMissing(strAddress) Then 
 .Address = strAddress 
 Else 
 .Address = "" 
 End If 
 .SubAddress = strSubAddress 
 .Follow 
 .Address = "" 
 .SubAddress = "" 
 End With 
 Case Else 
 MsgBox "The control '" &; ctlSelected.Name _ 
 &; "' does not support hyperlinks." 
 End Select 
End Sub

See also

Concepts

TextBox Object