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.