Application.BoxLinksEx 方法 (Project)

指定活动"网络图"视图中的链接线的外观,其中的颜色可以是十六进制值。

语法

expressionBoxLinksEx( _Style_, _ShowArrows_, _ShowLabels_, _ColorMode_, _CriticalColor_, _NoncriticalColor_ )

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

参数

名称 必需/可选 数据类型 说明
样式 可选 Long 指定链接线的样式。 可以是下列的 PjLinkStyle 常量之一: pjLinkStraightpjLinkRectilinear
ShowArrows 可选 Boolean 如此 如果链接线带有表明链接; 方向箭头否则为
ShowLabels 可选 Boolean 如此 如果链接线带有表明链接类型 (FS、 SS、 SF 或 FF); 标签否则为
ColorMode 可选 Long 指定确定链接线颜色的方式。 可为 PjLinkColorMode 常量之一。
CriticalColor 可选 Long 关键任务之间的链接线的颜色。 可以是 RGB 颜色的十六进制值,其中红色是最后一个字节。 例如,值 &HFF0000 为蓝色,&H00FFFF 为黄色。 默认值为 0,该值不更改以前的颜色。
NoncriticalColor 可选 Long 非关键任务之间的链接线的颜色。 可以是十六进制值;默认值为 0,该值不更改以前的颜色。

返回值

Boolean

说明

如果未不指定任何参数,则 BoxLinksEx 方法无效。 如果 ColorModepjColorModePredecessor,则忽略 NoncriticalColorCriticalColor 参数。

示例

下面的示例将显示链接标签,然后将关键链接设置为紫色,将非关键链接设置为青色。

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 枚举常量用于 CriticalColorNoncriticalColor 参数,则颜色将接近黑色。 例如, pjGreen 的值为 9,该值在 BoxLinksEx 方法中为深红色。 若要仅使用 PjColor 常量表示的 16 种颜色,请使用 BoxLinks 方法。

支持和反馈

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