Shape.DrawQuarterArc 方法 (Visio)

创建一个新建形状，其路径由作为参数传入的两个点和标志定义的椭圆弧组成。

语法

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

表达 一个代表 Shape 对象的变量。

参数

名称	必需/可选	数据类型	说明
xBegin	必需	Double	弧的起点的 x 轴坐标值。
yBegin	必需	Double	弧的起点的 y 轴坐标值。
xEnd	必需	Double	弧的终点的 x 轴坐标值。
yEnd	必需	Double	弧的终点的 y 轴坐标值。
SweepFlag	必需	VisArcSweepFlags	弧的类型，凹焊缝或凸焊缝。

返回值

Shape

说明

起点和端点定义弧线的边框，_SweepFlag_argument确定绘制边框内两个可能的弧形中的哪一个。 边界矩形始终与页面坐标系对齐;也就是说，椭圆的 x 轴与页面的 x 轴平行。

下列可能的 SweepFlag 参数值是由 Visio 类型库在 VisArcSweepFlags 中声明的。

常量	值	Description
visArcSweepFlagConcave	0	凹弧
visArcSweepFlagConvex	1	凸弧

如果 SweepFlag 为 visArcSweepFlagConcave，则连接椭圆中心到弧线的线条通过递减的角度扫描：如果它是 visArcSweepFlagConvex，则它会扫描增加的角度。

示例

以下 Microsoft Visual Basic for Applications (VBA) 宏显示如何使用 DrawQuarterArc 方法在绘图页上绘制凹焊缝弧。

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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。