Метод Application.BoxLinks (Project)

Указывает внешний вид линий связи в активном представлении сетевой схемы.

Синтаксис

выражение. BoxLinks( _Style_, _ShowArrows_, _ShowLabels_, _ColorMode_, _CriticalColor_, _NoncriticalColor_ )

выражение: переменная, представляющая объект Application.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Style	Необязательный	Long	Задает стиль линий связи. Может быть одной из следующих констант PjLinkStyle : pjLinkStraight или pjLinkRectilinear.
ShowArrows	Необязательный	Логический	Значение true, если линии ссылки имеют стрелки, показывающие направление ссылки; в противном случае — False.
ShowLabels	Необязательный	Логический	Значение true , если линии ссылки имеют метки с типом ссылки (FS, SS, SF или FF); в противном случае — False.
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 и обратная связь.