Application.BoxStylesEditEx 方法 (Project)

设置"网络图"视图中方框的样式,其中的颜色可以是十六进制值。

语法

expressionBoxStylesEditEx( _Style_, _DataTemplate_, _HorizontalGridlines_, _VerticalGridlines_, _BorderShape_, _BorderColor_, _BorderWidth_, _BackgroundColor_, _BackgroundPattern_ )

表达 返回 Application 对象的表达式。

参数

名称 必需/可选 数据类型 说明
样式 必需 Long 要更改的方框样式。 可为 PjBoxStyle 常量之一。
DataTemplate 可选 String 用于样式的数据模板的名称。
HorizontalGridlines 可选 Boolean 如此 如果水平网格线分隔各行中;否则为
VerticalGridlines 可选 Boolean 如此 如果垂直网格线分隔方框; 中的每个行否则为
BorderShape 可选 Long 方框边框的形状。 可为 PjBoxShape 常量之一。
BorderColor 可选 Long 方框边框的颜色。 可以是 RGB 颜色的十六进制值,其中红色是最后一个字节。 例如,值 &HFF0000 为蓝色,&H00FFFF 为黄色。
BorderWidth 可选 Long 取值范围为 1 到 4,以像素为单位指定方框边框的宽度。
BackgroundColor 可选 Long 方框背景颜色。 可以是 RGB 颜色的十六进制值。
BackgroundPattern 可选 Long 背景图案。 可以是 PjBackgroundPattern 常量之一。

返回值

Boolean

说明

若要显示 "方框样式" 对话框,请使用 BarBoxStyles 方法。

示例

下面的示例将更改为 pjBoxCritical 样式显示为圆角矩形框、 添加垂直网格线、 边框颜色设置为深红色,和背景颜色设置为浅灰色的抖动模式。

Sub BoxStyles_EditCritical() 
 'Activate the Network Diagram view 
 ViewApply Name:="Network Diagram" 
 
 BoxStylesEditEx Style:=pjBoxCritical, BorderShape:=pjBoxRoundedRectangle, VerticalGridlines:=True, _ 
 BorderColor:=&HB0, BorderWidth:=3, _ 
 BackgroundColor:=&HE0E0E0, BackgroundPattern:=pjBackgroundLightDither 
End Sub

注意

如果将任何 PjColor 枚举常量用于 BorderColorBackgroundColor 参数,则颜色将接近黑色。 例如, pjGreen 的值为 9,该值在 BoxLinksEx 方法中为深红色。 若要仅使用 PjColor 常量表示的 16 种颜色,请使用 BoxStylesEdit 方法。

支持和反馈

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