RecurrencePattern.RecurrenceType 属性 (Outlook)

返回或设置一个 OlRecurrenceType 常量，该常量指定定期模式的发生频率。 读/写。

语法

expression。 RecurrenceType

表达 一个代表 RecurrencePattern 对象的变量。

备注

设置 RecurrencePattern 对象的其他属性之前，必须设置 介于 1 。 您可以在以后设置 RecurrencePattern 属性取决于的值 介于 1 ，如下表所示:

OlRecurrenceType	有效的 RecurrencePattern 属性
olRecursWeekly	年 、 持续时间 、 结束时间 、 间隔 、 NoEndDate 、 事件 、 PatternStartDate 、 PatternEndDate 、 开始时间
olRecursMonthly	DayOfMonth 、 持续时间 、 结束时间 、 间隔 、 NoEndDate 、 事件 、 PatternStartDate 、 PatternEndDate 、 开始时间
olRecursMonthNth	年 、 持续时间 、 结束时间 、 间隔 、 实例 、 NoEndDate 、 事件 、 PatternStartDate 、 PatternEndDate 、 开始时间
olRecursYearly	DayOfMonth 、 持续时间 、 结束时间 、 间隔 、 MonthOfYear 、 NoEndDate 、 事件 、 PatternStartDate 、 PatternEndDate 、 开始时间
olRecursYearNth	年 、 持续时间 、 结束时间 、 间隔 、 实例 、 NoEndDate 、 事件 、 PatternStartDate 、 PatternEndDate 、 开始时间

示例

此Visual Basic for Applications示例使用 GetRecurrencePattern 获取新创建的 AppointmentItem 的 RecurrencePattern 对象。 设置了属性 RecurrenceType、 DayOfWeekMask、 MonthOfYear、 Instance、 Occurrences、 StartTime、 EndTime 和 Subject ，保存约会，然后使用模式显示：“从 2007 年 6 月 6 日开始到 2016 年 6 月的第一个星期一从下午 2：00 到下午 5：00 发生。

Sub RecurringYearNth() 
 
 Dim oAppt As AppointmentItem 
 
 Dim oPattern As RecurrencePattern 
 
 Set oAppt = Application.CreateItem(olAppointmentItem) 
 
 Set oPattern = oAppt.GetRecurrencePattern 
 
 With oPattern 
 
 .RecurrenceType = olRecursYearNth 
 
 .DayOfWeekMask = olMonday 
 
 .MonthOfYear = 6 
 
 .Instance = 1 
 
 .Occurrences = 10 
 
 .Duration = 180 
 
 .PatternStartDate = #6/1/2007# 
 
 .StartTime = #2:00:00 PM# 
 
 .EndTime = #5:00:00 PM# 
 
 End With 
 
 oAppt.Subject = "Recurring YearNth Appointment" 
 
 oAppt.Save 
 
 oAppt.Display 
 
End Sub

另请参阅

RecurrencePattern 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。