添加提醒后发生。
Private Sub expression_ReminderAdd(ByVal ReminderObject As Reminder)
expression 该变量引用一个在类模块中以事件形式声明的 Reminders 类型对象。
ReminderObject 必选。添加到集合中的 Reminder 对象。
在保存相关的 Microsoft Outlook 项目前,并不实际创建提醒。因此,只有在保存了相关的项目对象后,该事件才会发生。
以下示例在提醒添加到集合中时显示新提醒的名称。
Private Sub objReminders_ReminderAdd(ByVal ReminderObject As Reminder)
'Occurs when a Reminder object is added to the collection
MsgBox "The following reminder has been added: " & _
ReminderObject.Caption
End Sub