Application.HyperlinkPart 方法 (Access)

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

語法

運算式。超連結第 (部分超連結，第) 部分

expression 代表 Application 物件的變數。

參數

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

傳回值

字串

註解

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

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

注意事項

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

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

下表顯示 HyperlinkPart 方法針對儲存在 [超連結 ] 欄位中的資料所傳回的值。

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

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

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

acDisplayText： Microsoft

acAddress： https://www.microsoft.com

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

acDisplayText： Customers

acAddress： 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 會新增用來分隔超連結資料部分的兩個 # 符號。

您可以新增或編輯超連結欄位的 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 方法，傳回在 [連結] 資料表的 [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 支援與意見反應。

  • Last updated on