Access VBA教程:Follow方法

Follow方法可以打开由窗体或报表上控件的相关超链接地址所指定的文档或 Web 页。

expression.Follow(NewWindow, AddHistory, ExtraInfo, Method, HeaderInfo)

expression   必需。返回“Applies To”列表中的一个对象的表达式。

NewWindow  可选 Boolean 型。Boolean 型值,为 True (–1) 时在新窗口打开文档;为 False (0) 时,在当前窗口打开文档。默认值为 False。

AddHistory  可选 Boolean 型。Boolean 型值,为 True 时向“历史”文件夹添加超链接;为 False 时,不向“历史”文件夹添加超链接。默认值是 True。

ExtraInfo  可选 Variant 型。字符串或Byte 数据的数组,该数据指定定位到超链接的附加信息。例如,该参数可能用来为 .ASP 或 .IDC 文件指定搜索参数。在 Web 浏览器中,extrainfo参数有可能出现在超链接地址后面,并用问号 (?) 与地址隔开。指定 extrainfo 参数时不必包括问号。

Method  可选MsoExtraInfoMethod。Integer 型值,用于指定 extrainfo参数的附加方式。method参数可以是下列固有常量之一:

MsoExtraInfoMethod 可以是下列 MsoExtraInfoMethod 常量之一:
msoMethodGet 默认。extrainfo 参数将附加到超链接地址且只能是字符串。默认情况下将传递该值。
msoMethodPost。extrainfo参数作为字符串或 Byte 数据类型的数组进行投递。

HeaderInfo  可选 String 型。用于指定页眉信息的字符串。默认情况下,headerinfo 参数是零长度字符串 (" ")。

说明

Follow方法与单击超链接有相同的效果。

如果要打开一个超链接来响应用户的操作,可以在事件过程中包含 Follow方法。例如,在用户打开指定的窗体时,可能要打开含有引用信息的 Web 页。

在使用 Follow方法时,不需要知道控件的HyperlinkAddress属性所指定的地址,只需要知道包含该超链接的控件的名称。与此相反,当使用FollowHyperlink方法时,需要指定将访问的特定超链接的地址。

VBA示例

下面的示例设置命令按钮的 HyperlinkAddress属性,然后在加载窗体时打开超链接。

若要试用该示例,请创建一个窗体并添加命令按钮 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

上页:Access VBA教程:FirstPage、LastPage、NextPage、PreviousPage方法 (Snapshot Viewer) 下页:Access VBA教程:FollowHyperlink方法

Access VBA教程:Follow方法

Access VBA教程:FollowHyperlink方法 Access VBA教程:GetHiddenAttribute方法
Access VBA教程:GetOption方法 Access VBA教程:GoToPage方法
Access VBA教程:GUIDFromString方法 Access VBA教程:HyperlinkPart方法
Access VBA教程:ImportXML方法 Access VBA教程:InsertLines方法
Access VBA教程:InsertText方法 Access VBA教程:Item方法
Access VBA教程:Line方法 Access VBA教程:Modify方法
Access VBA教程:Move方法 Access VBA教程:NewAccessProject方法
Access VBA教程:NewCurrentDatabase方法 Access VBA教程:Nz函数
Access VBA教程:OfflineConflict方法 Access VBA教程:OpenAccessProject方法
Access VBA教程:OpenConnection方法 Access VBA教程:OpenCurrentDatabase方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号