共用方式為

Application.HyperlinkPart 方法 (Access)

  • 發行項

HyperlinkPart方法會傳回儲存為超連結資料類型的資料相關資訊。

語法

運算式。HyperlinkPart (超連結， 元件)

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Hyperlink 必要 Variant 儲存在 超連結 欄位中的資料。
Part 選用 AcHyperlinkPart AcHyperlinkPart常數，代表您想要由 HyperlinkPart方法傳回的資訊。

傳回值

字串

註解

您可以使用 HyperlinkPart 方法，從 Hyperlink 欄位或顯示的值傳回三個值的其中一個。 傳回的值取決於 part引數的設定。

part引數是選擇性的。 如果未使用，函數會傳回 Microsoft Access 會顯示超連結 (這會對應至 part引數的 acDisplayedValue 設定) 的值。 傳回的值可以是Hyperlink欄位的四個部分之一， (displaytext、address、subaddress或screentip) 、完整位址、位址# 子位址或 Microsoft Access 針對超連結顯示的值。

注意事項

如果您在查詢中使用HyperlinkPart方法，則需要 part 引數，而且您無法使用上面所列的常數，但必須改用實際值。

在[超連結] 欄位的displaytext部分中提供值時，Microsoft Access 所顯示的值會與displaytext設定相同。 當Hyperlink欄位的displaytext部分沒有值時，顯示的值會是Hyperlink欄位的位址或子位址部分，視欄位中第一次出現的值而定。

下表顯示 HyperlinkPart 方法針對 Hyperlink 欄位中儲存的資料所傳回的值。

[超連結] 欄位資料 HyperlinkPart 方法的傳回值
#https://www.microsoft.com# acDisplayedValue： https://www.microsoft.com

acDisplayText： acAddress： https://www.microsoft.com

acSubAddress： acScreenTip： acFullAddress： https://www.microsoft.com
Microsoft#https://www.microsoft.com# acDisplayedValue： Microsoft

acDisplayText： Microsoft

acAddress： https://www.microsoft.com

acSubAddress： acScreenTip： acFullAddress： https://www.microsoft.com
Customers#https://www.microsoft.com#Form Customers acDisplayedValue： Customers

acDisplayText： Customers

acAddress： https://www.microsoft.com

acSubAddress： Form Customers

acScreenTip： acFullAddress： https://www.microsoft.com#Form Customer
##Form Customers#Enter Information acDisplayedValue： Form Customers

acDisplayText： acAddress： acSubAddress： Form Customers

acScreenTip： Enter Information

acFullAddress： #FormCustomer

當您使用 [插入超連結] 對話方塊將位址元件新增至[超連結] 欄位時， (選擇 [插入] 功能表上的[超連結]) 或直接在[超連結] 欄位中輸入位址元件，Access 會新增兩個 #符號來分隔超連結資料的各個部分。

您可以以滑鼠右鍵按一下表格、表單或報表中的超連結，指向快捷方式功能表上的[超連結]，然後在 [要顯示的文字] 方塊中輸入顯示文字，來新增或編輯超連結欄位的displaytext部分。

當您直接將資料新增至 [超連結 ] 欄位時，必須包含兩個 # 符號來分隔超連結資料的各個部分。

範例

下列範例會使用所有四個 part 引數常數來顯示 HyperlinkPart 方法針對包含 超連結 欄位之資料表中每筆記錄所傳回的資訊。 若要嘗試此範例中，貼入模組的宣告區段中的 DisplayHyperlinkParts 程序。 您可以呼叫 DisplayHyperlinkParts 程序指定偵錯] 視窗中，從包含超連結或含有超連結資料的欄位名稱的資料表名稱傳遞給它。 例如：

DisplayHyperlinkParts "MyHyperlinkTableName", "MyHyperlinkFieldName" 
 
Public Sub DisplayHyperlinkParts(ByVal strTable As String, _ 
 ByVal strField As String) 
 
 Dim rst As New ADODB.Recordset 
 Dim strMsg As String 
 
 
 rst.Open strTable, CurrentProject.Connection, _ 
 adOpenForwardOnly, adLockReadOnly 
 
 ' For each record in table. 
 Do Until rst.EOF 
 strMsg = "DisplayValue = " _ 
 & HyperlinkPart(rst(strField), acDisplayedValue) _ 
 & vbCrLf & "DisplayText = " _ 
 & HyperlinkPart(rst(strField), acDisplayText) _ 
 & vbCrLf & "Address = " _ 
 & HyperlinkPart(rst(strField), acAddress) _ 
 & vbCrLf & "SubAddress = " _ 
 & HyperlinkPart(rst(strField), acSubAddress) _ 
 & vbCrLf & "ScreenTip = " _ 
 & HyperlinkPart(rst(strField), acScreenTip) _ 
 & vbCrLf & "Full Address = " _ 
 & HyperlinkPart(rst(strField), acFullAddress) 
 
 ' Show parts returned by HyperlinkPart function. 
 MsgBox strMsg 
 rst.MoveNext 
 Loop 
 
End Sub

當您在查詢中使用 HyperlinkPart 方法時， part引數是必要的。 例如，下列 SQL 語句會使用 HyperlinkPart 方法，在 Links 資料表的 URL 欄位中傳回儲存為超連結資料類型的資料相關資訊：

SELECT Links.URL, HyperlinkPart([URL],0) 
 AS Display, HyperlinkPart([URL],1) 
 AS Name, HyperlinkPart([URL],2) 
 AS Addr, HyperlinkPart([URL],3) 
 AS SubAddr, HyperlinkPart([URL],4) 
 AS ScreenTip 
 FROM Links

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。