Shape.DrawLine-Methode (Visio)Shape.DrawLine Method (Visio)

Der Shapes -Auflistung eines Gruppen-Shapes hinzugefügt eine Linie.Adds a line to the Shapes collection of a group shape.

SyntaxSyntax

expression.expression. DrawLine( _xBegin_ , _yBegin_ , _xEnd_ , _yEnd_ )

Ausdruck Eine Variable, die ein Shape -Objekt darstellt.expression A variable that represents a Shape object.

ParameterParameters

NameName Erforderlich/OptionalRequired/Optional DatentypData type BeschreibungDescription
xBeginxBegin ErforderlichRequired DoubleDouble Die X-Koordinate des Anfangspunkts der Linie.The x-coordinate of the line's begin point.
yBeginyBegin ErforderlichRequired DoubleDouble Die Y-Koordinate des Anfangspunkts der Linie.The y-coordinate of the line's begin point.
xEndxEnd ErforderlichRequired DoubleDouble Die X-Koordinate des Endpunkts der Linie.The x-coordinate of the line's endpoint.
yEndyEnd ErforderlichRequired DoubleDouble Die Y-Koordinate des Endpunkts der Linie.The y-coordinate of the line's endpoint.

RückgabewertReturn value

ShapeShape

HinweiseRemarks

Mithilfe der DrawLine -Methode entspricht der Verwendung des Line -Tools in Microsoft Visio.Using the DrawLine method is equivalent to using the Line tool in Microsoft Visio. Die Argumente werden in internen Zeichnungseinheiten in Bezug auf den Koordinatenbereich des Zeichenblatts, Master-Shape oder Gruppe, in dem die Zeile platziert wird.The arguments are in internal drawing units with respect to the coordinate space of the page, master, or group where the line is being placed.

BeispielExample

Mit dem folgenden Beispiel wird gezeigt, wie ein Linien-Shape auf dem aktiven Zeichenblatt gezeichnet wird.The following example shows how to draw a line shape on the active page.

 
Public Sub DrawLine_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 Set vsoShape = ActivePage.DrawLine(5, 4, 7.5, 1) 
 
End Sub