Outlook) (MailItem.Read 事件

會在使用者開啟父物件的執行個體進行編輯時發生。

語法

expression。 Read

表達 代表 MailItem 物件的 變數。

註解

Read 事件與 Open 事件不同之處在於，每當使用者在支援欄位內編輯的檢視下選取項目以及在 Inspector 中開啟項目時，就會發生 Read。

範例

這個 Visual Basic for Applications (VBA) 範例會使用 Read 事件來遞增計數器，以追蹤專案的讀取頻率。

Public WithEvents myItem As Outlook.MailItem 
 
 
 
Sub Initialize_handler() 
 
 Set myItem = Application.ActiveExplorer.CurrentFolder.Items(1) 
 
 myItem.Display 
 
End Sub 
 
 
 
Sub myItem_Read() 
 
 Dim myProperty As Outlook.UserProperty 
 
 Set myProperty = myItem.UserProperties("ReadCount") 
 
 If (myProperty Is Nothing) Then 
 
 Set myProperty = myItem.UserProperties.Add("ReadCount", olNumber) 
 
 End If 
 
 myProperty.Value = myProperty.Value + 1 
 
 myItem.Save 
 
End Sub

另請參閱

MailItem 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。