ShapeNode.SegmentType-Eigenschaft (Publisher)

Gibt eine MsoSegmentType-Konstante zurück, die angibt, ob das dem angegebenen Knoten zugeordnete Segment gerade oder gekrümmt ist. Schreibgeschützt.

Syntax

Ausdruck. SegmentType

Ausdruck Eine Variable, die ein ShapeNode-Objekt darstellt.

Rückgabewert

MsoSegmentType

Hinweise

Der Wert der SegmentType-Eigenschaft kann eine der in der Microsoft Publisher-Typbibliothek deklarierten MsoSegmentType-Konstanten sein.

Wenn der angegebene Knoten ein Kontrollpunkt für ein gekrümmten Abschnitt ist, gibt diese Eigenschaft msoSegmentCurve zurück.

Verwenden Sie die SetSegmentType -Methode, um den Wert dieser Eigenschaft festzulegen.

Beispiel

Dieses Beispiel ändert alle geraden Abschnitte in der ersten Form auf der ersten Seite der aktiven Publikation in gekrümmte Abschnitte. Damit dieses Beispiel funktionsfähig ist, muss es sich bei der angegebenen Form um eine Freihandformzeichnung handeln.

Sub ChangeSegmentTypes() 
 Dim intNode As Integer 
 With ActiveDocument.Pages(1).Shapes(1).Nodes 
 intNode = 1 
 Do While intNode <= .Count 
 If .Item(intNode).SegmentType = msoSegmentLine Then 
 .SetSegmentType Index:=intNode, _ 
 SegmentType:=msoSegmentCurve 
 End If 
 intNode = intNode + 1 
 Loop 
 End With 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.