Follow 方法可以打開由窗體或報表上控件的相關(guān)超鏈接地址所指定的文檔或網(wǎng)頁。
expression.Follow(NewWindow, AddHistory, ExtraInfo, Method, HeaderInfo)
expression 必需。返回“應(yīng)用于”列表中的一個對象的表達式。
NewWindow 可選 Boolean 型。Boolean 型值,為 True (–1) 時在新窗口打開文檔;為 False (0) 時,在當(dāng)前窗口打開文檔。默認值為 False。
AddHistory 可選 Boolean 型。Boolean 型值,為 True 時向“歷史”文件夾添加超鏈接;為 False 時,不向“歷史”文件夾添加超鏈接。默認值是 True。
ExtraInfo 可選 Variant 型。字符串或 Byte 數(shù)據(jù)的數(shù)組,該數(shù)據(jù)指定定位到超鏈接的附加信息。例如,該參數(shù)可能用來為 .ASP 或 .IDC 文件指定搜索參數(shù)。在 Web 瀏覽器中,extrainfo 參數(shù)有可能出現(xiàn)在超鏈接地址后面,并用問號 (?) 與地址隔開。指定 extrainfo 參數(shù)時不必包括問號。
Method 可選 MsoExtraInfoMethod。Integer 值,用于指定 extrainfo 參數(shù)的附加方式。method 參數(shù)可以是下列固有常量之一:
MsoExtraInfoMethod 可以是下列 MsoExtraInfoMethod 常量之一: |
msoMethodGet 默認。extrainfo 參數(shù)將附加到超鏈接地址且只能是字符串。默認情況下將傳遞該值。 |
msoMethodPost。extrainfo 參數(shù)作為字符串或 Byte 數(shù)據(jù)類型的數(shù)組進行投遞。 |
HeaderInfo 可選 String 型。用于指定頁眉信息的字符串。默認情況下,headerinfo 參數(shù)是零長度字符串 (" ")。
Follow 方法與單擊超鏈接有相同的效果。
如果要打開一個超鏈接來響應(yīng)用戶的操作,可以在事件過程中包含 Follow 方法。例如,在用戶打開指定的窗體時,可能要打開含有引用信息的網(wǎng)頁。
在使用 Follow 方法時,不需要知道控件的 HyperlinkAddress 屬性所指定的地址,只需要知道包含該超鏈接的控件的名稱。與此相反,當(dāng)使用 FollowHyperlink 方法時,需要指定將訪問的特定超鏈接的地址。
下面的示例設(shè)置命令按鈕的 HyperlinkAddress 屬性,然后在加載窗體時打開超鏈接。
若要試用該示例,請創(chuàng)建一個窗體并添加命令按鈕 Command0。將下列代碼粘貼到窗體的模塊并切換到“窗體”視圖:
Private Sub Form_Load()
Dim ctl As CommandButton
Set ctl = Me!Command0
With ctl
.Visible = False
.HyperlinkAddress = "http://www.microsoft.com/"
.Hyperlink.Follow
End With
End Sub