修改提醒后发生。
Private Sub expression_ReminderChange(ByVal ReminderObject As Reminder)
expression 该变量引用一个在类模块中以事件形式声明的 Reminders 类型对象。
ReminderObject 必选。被修改的 Reminder 对象。
以下示例会在每次修改提醒时向用户弹出一条消息。
Private Sub objReminders_ReminderChange(ByVal ReminderObject As Reminder)
'Occurs when reminder is changed
MsgBox "The reminder " & ReminderObject.Caption & " has changed."
End Sub