全部显示

AddToFavorites 将超链接地址添加到“收藏夹”文件夹。

expression.AddToFavorites

expression     必需。返回“应用于”列表中的一个对象的表达式。

说明

应用于 Application 对象时，AddToFavorites 方法将当前数据库的名称添加到“收藏夹”文件夹。例如，在“罗斯文”示例数据库中，对 Application 对象应用 AddToFavorites 方法可以将“罗斯文”数据库添加到“收藏夹”文件夹。

应用于 Control 对象时，AddToFavorites 方法将控件中的超链接地址添加到“收藏夹”文件夹。“收藏夹”文件夹默认安装在“Windows”文件夹。

AddToFavorites 方法与打开要添加地址的文档，单击 Web 工具栏上的“收藏夹”菜单中的“添加到‘收藏夹’”效果相同。

示例

以下示例设置命令按钮的 HyperlinkAddress 属性。当用户单击该按钮时，将使用 AddToFavorites 方法将地址添加到“收藏夹”文件夹。

如果要试验该示例，请新建一个窗体，并添加名为“Command0”的命令按钮。将以下代码粘贴到窗体的模块中。切换到“窗体”中，并单击命令按钮。

Private Sub Form_Load()

    Me!Command0.HyperlinkAddress = "http://www.microsoft.com/"

End Sub

Private Sub Command0_Click()

    Me!Command0.Hyperlink.AddToFavorites

End Sub