Outlook) (Search.Results 屬性
會傳回指定搜尋結果的 Results 集合。 唯讀。
語法
expression。 Results
表達 代表 Search 物件的變數。
範例
下列 Visual Basic for Applications (VBA) 範例會在 [收 件匣 ] 中搜尋主旨等於 「Test」 的專案,並顯示搜尋所傳回電子郵件專案的寄件者名稱。 當 AdvanceSearchComplete
搜尋完成時,事件程序會將布林值 blnSearchComp
設定為 True 。 程式會使用 TestAdvancedSearchComplete()
這個布林值變數來判斷搜尋何時完成。 範例程式碼必須放在類別模組中,例如 ThisOutlookSession,而且 TestAdvancedSearchComplete()
必須先呼叫程式,Outlook 才能呼叫事件程序。
Public blnSearchComp As Boolean
Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
MsgBox "The AdvancedSearchComplete Event fired"
blnSearchComp = True
End Sub
Sub TestAdvancedSearchComplete()
Dim sch As Outlook.Search
Dim rsts As Outlook.Results
Dim i As Integer
blnSearchComp = False
Const strF As String = "urn:schemas:mailheader:subject = 'Test'"
Const strS As String = "Inbox"
Set sch = Application.AdvancedSearch(strS, strF)
While blnSearchComp = False
DoEvents
Wend
Set rsts = sch.Results
For i = 1 To rsts.Count
MsgBox rsts.Item(i).SenderName
Next
End Sub
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。