Results 属性

返回指定搜索结果的 Results 集合。

expression  必选。该表达式返回 Search 对象。

示例

以下事件过程示例将搜索结果存储在名为“objRsts”的变量中，并将搜索结果显示在“立即窗口”中。为确保有搜索结果，请始终使用 AdvancedSearchComplete 事件。

Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)

    Dim objRsts As Results
    MsgBox "The search " & SearchObject.Tag & "has completed. The scope of the search was " & _
        SearchObject.Scope & "."
    Set objRsts = SearchObject.Results
    'Print out number in Results collection
    Debug.Print objRsts.Count
    'Print out each member of Results collection
    For Each Item In objRsts
        Debug.Print Item
    Next

End Sub