Application.BoxLinksEx 方法 (Project)
指定活动"网络图"视图中的链接线的外观,其中的颜色可以是十六进制值。
语法
expression。 BoxLinksEx
( _Style_
, _ShowArrows_
, _ShowLabels_
, _ColorMode_
, _CriticalColor_
, _NoncriticalColor_
)
表达 返回 Application 对象的表达式。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
样式 | 可选 | Long | 指定链接线的样式。 可以是下列的 PjLinkStyle 常量之一: pjLinkStraight 或 pjLinkRectilinear 。 |
ShowArrows | 可选 | Boolean | 如此 如果链接线带有表明链接; 方向箭头否则为 假 。 |
ShowLabels | 可选 | Boolean | 如此 如果链接线带有表明链接类型 (FS、 SS、 SF 或 FF); 标签否则为 假 。 |
ColorMode | 可选 | Long | 指定确定链接线颜色的方式。 可为 PjLinkColorMode 常量之一。 |
CriticalColor | 可选 | Long | 关键任务之间的链接线的颜色。 可以是 RGB 颜色的十六进制值,其中红色是最后一个字节。 例如,值 &HFF0000 为蓝色,&H00FFFF 为黄色。 默认值为 0,该值不更改以前的颜色。 |
NoncriticalColor | 可选 | Long | 非关键任务之间的链接线的颜色。 可以是十六进制值;默认值为 0,该值不更改以前的颜色。 |
返回值
Boolean
说明
如果未不指定任何参数,则 BoxLinksEx 方法无效。 如果 ColorMode 为 pjColorModePredecessor,则忽略 NoncriticalColor 和 CriticalColor 参数。
示例
下面的示例将显示链接标签,然后将关键链接设置为紫色,将非关键链接设置为青色。
Sub BoxLink_ChangeColor()
'Activate the Network Diagram view
ViewApply Name:="Network Diagram"
BoxLinksEx Style:=pjLinkRectilinear, ShowArrows:=True, ShowLabels:=True, ColorMode:=pjColorModeCustom, _
CriticalColor:=&HBB00BB, noncriticalcolor:=&H999900
End Sub
注意
如果将任何 PjColor 枚举常量用于 CriticalColor 或 NoncriticalColor 参数,则颜色将接近黑色。 例如, pjGreen 的值为 9,该值在 BoxLinksEx 方法中为深红色。 若要仅使用 PjColor 常量表示的 16 种颜色,请使用 BoxLinks 方法。
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。