Page.DrawQuarterArc method (Visio)

Article
01/19/2022

Creates a shape whose path consists of an elliptical arc defined by the two points and the flag passed in as arguments.

Syntax

expression. DrawQuarterArc( _xBegin_ , _yBegin_ , _xEnd_ , _yEnd_ , _SweepFlag_ )

expression A variable that represents a Page object.

Parameters

Name	Required/Optional	Data type	Description
xBegin	Required	Double	The x-coordinate of the begin point of the arc.
yBegin	Required	Double	The y-coordinate of the begin point of the arc.
xEnd	Required	Double	The x-coordinate of the endpoint of the arc.
yEnd	Required	Double	The y-coordinate of the endpoint of the arc.
SweepFlag	Required	VisArcSweepFlags	The type of arc, concave or convex.

Return value

Shape

Remarks

The begin and endpoints define the bounding rectangle of the arc, and the _SweepFlag_argument determines which of the two possible arcs within the bounding rectangle is drawn. The bounding rectangle is always aligned to the page coordinate system; that is, the x -axis of the ellipse is parallel to the x -axis of the page.

The following possible values for the SweepFlag argument are declared in VisArcSweepFlags in the Visio type library.

Constant	Value	Description
visArcSweepFlagConcave	0	Concave arc
visArcSweepFlagConvex	1	Convex arc

If SweepFlag is visArcSweepFlagConcave, the line joining the center of the ellipse to the arc sweeps through decreasing angles; if it is visArcSweepFlagConvex, it sweeps through increasing angles.

Example

This Microsoft Visual Basic for Applications (VBA) macro shows how to use the DrawQuarterArc method to draw a concave arc on the drawing page.

Public Sub DrawQuarterArc_Example 
 
 Dim vsoShape As Visio.Shape 
 Set vsoShape = ActivePage.DrawQuarterArc(3, 3, 6, 8, visArcSweepFlagConcave) 
 
End Sub

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.