Método Page.DrawQuarterArc (Visio)

Crea una forma cuyo trazado consta de un arco elíptico definido por los dos puntos y la marca que se pasan como argumentos.

Sintaxis

expresión. DrawQuarterArc( _xBegin_ , _yBegin_ , _xEnd_ , _yEnd_ , _SweepFlag_ )

Expresión Variable que representa un objeto Page .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
xBegin	Obligatorio	Double	Coordenada x del punto inicial del arco.
yBegin	Obligatorio	Double	Coordenada y del punto inicial del arco.
xEnd	Obligatorio	Double	Coordenada x del punto final del arco.
yEnd	Obligatorio	Double	Coordenada y del punto final del arco.
SweepFlag	Obligatorio	VisArcSweepFlags	Tipo de arco, cóncavo o convexo.

Valor devuelto

Forma

Comentarios

Los puntos inicial y final definen el rectángulo delimitador del arco y el _SweepFlag_argument determina cuál de los dos arcos posibles dentro del rectángulo delimitador se dibuja. El rectángulo delimitador siempre se alinea con el sistema de coordenadas de página; es decir, el eje x de la elipse es paralelo al eje x de la página.

Los siguientes valores posibles para el argumento SweepFlag se declaran en VisArcSweepFlags en la biblioteca de tipos de Visio.

Constante	Valor	Descripción
visArcSweepFlagConcave	0	Arco cóncavo
visArcSweepFlagConvex	1	Arco convexo

Si SweepFlag es visArcSweepFlagConcave, la línea que une el centro de la elipse con el arco pasa por ángulos decrecientes; si es visArcSweepFlagConvex, se desplaza a través de ángulos crecientes.

Ejemplo:

Esta macro de Microsoft Visual Basic para Aplicaciones (VBA) muestra cómo utilizar el método DrawQuarterArc para dibujar un arco cóncavo en la página de dibujo.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.