Page.DrawQuarterArc 方法 (Visio)
创建一个形状，其路径由作为参数传入的两个点和标志定义的椭圆弧组成。
语法
expression。 DrawQuarterArc( _xBegin_ , _yBegin_ , _xEnd_ , _yEnd_ , _SweepFlag_ )
表达 一个代表 Page 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。