AddToFavorites 方法

全部顯示

AddToFavorites 將超鏈接地址添加到“收藏夾”文件夾。

expression.AddToFavorites

expression     必需。返回“應(yīng)用于”列表中的一個對象的表達式。

說明

應(yīng)用于 Application 對象時，AddToFavorites 方法將當前數(shù)據(jù)庫的名稱添加到“收藏夾”文件夾。例如，在“羅斯文”示例數(shù)據(jù)庫中，對 Application 對象應(yīng)用 AddToFavorites 方法可以將“羅斯文”數(shù)據(jù)庫添加到“收藏夾”文件夾。

應(yīng)用于 Control 對象時，AddToFavorites 方法將控件中的超鏈接地址添加到“收藏夾”文件夾?！笆詹貖A”文件夾默認安裝在“Windows”文件夾。

AddToFavorites 方法與打開要添加地址的文檔，單擊 Web 工具欄上的“收藏夾”菜單中的“添加到‘收藏夾’”效果相同。

示例

以下示例設(shè)置命令按鈕的 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