共用方式為

Application.HyperlinkPart 方法 (存取)

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

語法

表達。超連結超連結第 (部分，第) 部分

expression 代表 Application 物件的變數。

參數

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

傳回值

字串

註解

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

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

注意事項

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

在超連結欄位的 displaytext 部分提供值時，Microsoft Access 顯示的值將與 displaytext 設定相同。 當超連結欄位的顯示文字部分沒有值時，顯示的值將是超連結欄位的地址或子地址部分，視欄位中首先出現的值而定。

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

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

acDisplayText： ac位址： https://www.microsoft.com

acSubAddress： acScreen提示： acFullAddress： https://www.microsoft.com
Microsoft#https://www.microsoft.com# acDisplayedValue： Microsoft

acDisplayText： Microsoft

ac地址： https://www.microsoft.com

acSubAddress： acScreen提示： acFullAddress： https://www.microsoft.com
Customers#https://www.microsoft.com#Form Customers acDisplayedValue： Customers

acDisplayText： Customers

ac地址： https://www.microsoft.com

acSubAddress： Form Customers

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

acDisplayText： acAddress： acSubAddress： Form Customers

acScreen提示： Enter Information

acFullAddress： #FormCustomer

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

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

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

範例

下列範例會使用所有四個 part 引數常數，來顯示 HyperlinkPart 方法針對包含 Hyperlink 欄位的資料表中每筆記錄所傳回的資訊。 若要嘗試此範例中，貼入模組的宣告區段中的 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 欄位中 Hyperlink 資料類型的資料相關資訊：

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 支援與意見反應。

  • Last updated on