Application.BoxLinks 方法 (Project)

指定活动“网络图”视图中链接线的外观。

语法

expression。 BoxLinks( _Style_, _ShowArrows_, _ShowLabels_, _ColorMode_, _CriticalColor_, _NoncriticalColor_ )

expression：表示 Application 对象的变量。

参数

名称	必需/可选	数据类型	说明
样式	可选	Long	指定链接线的样式。 可以是下列的 PjLinkStyle 常量之一: pjLinkStraight 或 pjLinkRectilinear 。
ShowArrows	可选	Boolean	如此 如果链接线带有表明链接; 方向箭头否则为 假 。
ShowLabels	可选	Boolean	如此 如果链接线带有表明链接类型 (FS、 SS、 SF 或 FF); 标签否则为 假 。
ColorMode	可选	Long	指定确定链接线颜色的方式。 可为 PjLinkColorMode 常量之一。
CriticalColor	可选	Long	关键任务之间链接线的颜色。 默认值是 pjRed 。 可以是 PjColor 常量之一。
NoncriticalColor	可选	Long	非关键任务之间链接线的颜色。 可以是 PjColor 常量之一。 默认值是 pjBlack 。

返回值

Boolean

说明

如果未不指定任何参数，则 BoxLinks 方法无效。 如果 ColorMode 为 pjColorModePredecessor，则 忽略 NoncriticalColor 和 CriticalColor 参数。

若要编辑颜色可以为 RGB 值的方框链接线，请使用 BoxLinksEx 方法。

示例

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

Sub BoxLink_ChangeColor() 
 
 'Activate the Network Diagram view 
 ViewApply Name:="Network Diagram" 
 
 BoxLinks Style:=ShowLabels:=True, ColorMode:=pjColorModeCustom, _ 
 CriticalColor:=pjPurple, NoncriticalColor:=pjTeal 
End Sub

支持和反馈

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