Application.CalendarDateBoxes 方法 (Project)

自定义“日历”视图中日期框的上下分隔条。

语法

expression。 CalendarDateBoxes( _TopLeft_, _TopRight_, _BottomLeft_, _BottomRight_, _TopColor_, _BottomColor_, _TopPattern_, _BottomPattern_ )

expression：表示 Application 对象的变量。

参数

名称	必需/可选	数据类型	说明
TopLeft	可选	Long	每个日期框左上角的日期的格式。 可为 PjCalendarDateLabel 常量之一。
TopRight	可选	Long	在每个日期框右上角的日期的格式。 可以是 PjCalendarDateLabel 常量之一。
BottomLeft	可选	Long	在每个日期框左下角的日期的格式。 可以是 PjCalendarDateLabel 常量之一。
BottomRight	可选	Long	每个日期框的右下角中的日期格式。 可以是 PjCalendarDateLabel 常量之一。
TopColor	可选	Long	每个日期框顶部分隔条的颜色。 可以是 PjColor 常量之一。
BottomColor	可选	Long	每个日期框底部分隔条的颜色。 可以是 PjColor 常量之一。
TopPattern	可选	Long	每个日期框顶部的分隔条的图案。 可以是 PjFillPattern 常量之一。
BottomPattern	可选	Long	每个日期框底部分隔条的图案。 可以是 PjFillPattern 常量之一。

返回值

Boolean

说明

不带任何参数使用 CalendarDateBoxes 方法显示 时间刻度对话框中选择 日期框选项卡。

若要编辑颜色可以是 RGB 值的日历日期框，请使用 CalendarDateBoxesEx 方法。

示例

下面的示例显示 (例如，星期四) 星期几的左上角的月份和日期 (例如，1 月 31 日) 在右上方角，年和 (例如，70 2012年) 年的一天中的每个日期框左下角在日历并设置顶部分隔条和底部分隔条的背景颜色。

Sub FormatCalendarDays() 
    CalendarDateBoxes Topleft:=pjDay_dddd, TopRight:=pjDay_mmm_dd, _
        BottomLeft:=pjCalendarLabelDayOfYear_dd_yyyy, _ 
        TopColor:=PjColor.pjSilver, BottomColor:=PjColor.pjYellow 
End Sub

支持和反馈

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