返回或设置表示定期约会或任务在星期几发生的掩码。OlDaysOfWeek 常量。按月或按年模式仅对单独的一天有效。按周模式仅在作为 DayOfWeekMask 的 Or 时有效。可读写。
| OlDaysOfWeek 可为以下 OlDaysOfWeek 常量之一。 |
| olFriday |
| olMonday |
| olSaturday |
| olSunday |
| olThursday |
| olTuesday |
| olWednesday |
expression.DayOfWeekMask
expression 必选。该表达式返回 RecurrencePattern 对象。
本 Visual Basic for Applications 示例使用 GetRecurrencePattern 来获得最近创建的 AppointmentItem 的 RecurrencePattern 对象。设置 RecurrenceType、DayOfWeekMask、PatternStartDate、Interval、PatternEndDate 和 Subject 属性，并保存该约会，然后按模式“每 3 周的周一下午 2:00 到 5:00 之间发生，有效时间为 98 年 1 月 21 日到 2001 年 12 月 21 日之间”显示约会。
Set myOlApp = New Outlook.Application
Set myApptItem = myOlApp.CreateItem(olAppointmentItem)
Set myRecurrPatt = myApptItem.GetRecurrencePattern
myRecurrPatt.RecurrenceType = olRecursWeekly
myRecurrPatt.DayOfWeekMask = olMonday
myRecurrPatt.PatternStartDate = #1/21/98 2:00:00 PM#
myRecurrPatt.Interval = 3
myRecurrPatt.PatternEndDate = #12/21/2001 5:00:00 PM#
myApptItem.Subject = "Important Appointment"
myApptItem.Save
myApptItem.Display如果使用 VBScript，则不创建 Application 对象，而且也不能使用命名常量。本示例说明如何使用 VBScript 执行相同任务。
Set myApptItem = Application.CreateItem(1)
Set myRecurrPatt = myApptItem.GetRecurrencePattern
myRecurrPatt.RecurrenceType = 1
myRecurrPatt.DayOfWeekMask = 2
myRecurrPatt.PatternStartDate = #1/21/98 2:00:00 PM#
myRecurrPatt.Interval = 3
myRecurrPatt.PatternEndDate = #12/21/2001 5:00:00 PM#
myApptItem.Subject = "Important Appointment"
myApptItem.Save
myApptItem.Display