Compartir a través de


Método Shape.DrawQuarterArc (Visio)

Crea una forma nueva 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 Shape .

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.