TextBox.Hyperlink-Eigenschaft (Access)

Verwenden Sie die Hyperlink-Eigenschaft , um einen Verweis auf ein Hyperlink-Objekt zurückzugeben und auf die Eigenschaften und Methoden des Hyperlinks eines Steuerelements zuzugreifen. Schreibgeschützt.

Syntax

Ausdruck verwendet werden. Hyperlink

Ausdruck Eine Variable, die ein TextBox-Objekt darstellt.

Beispiel

Die CreateHyperlink-Prozedur im folgenden Beispiel legt die Hyperlinkeigenschaften für eine Befehlsschaltfläche, eine Bezeichnung oder ein Bildsteuerelement auf die Adress- und Unteradresswerte fest, die an die Prozedur übergeben werden. Die Adresseinstellung ist ein optionales Argument, da für einen Link zu einem Objekt in der aktuellen Datenbank nur die Einstellung für Unteradressen verwendet wird.

Erstellen Sie für dieses Beispiel ein Formular mit zwei Textfeld-Steuerelementen (txtAddress und txtSubAddress) und einer Befehlsschaltfläche (cmdFollowLink), und fügen Sie Folgendes in den Abschnitt "Deklarationen" des Formularmoduls ein.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.