通过

Page.DrawOval 方法 (Visio)

向页面的 Shapes 集合添加椭圆。

语法

expression。 DrawOval( _x1_ , _y1_ , _x2_ , _y2_ )

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

参数

名称 必需/可选 数据类型 说明
x1 必需 Double 椭圆的宽度-高度框的一个角的 x 轴坐标值。
y1 必需 Double 椭圆的宽度-高度框的一个角的 y 轴坐标值。
x2 必需 Double 椭圆的宽度-高度框的另一个角的 x 轴坐标值。
y2 必需 Double 椭圆的宽度-高度框的另一个角的 y 轴坐标值。

返回值

Shape

说明

使用 DrawOval 方法等效于使用应用程序中的“椭圆”工具。 参数以放置椭圆的页面、主控形状或组的坐标空间的内部绘图单位表示。

示例

以下示例显示如何在活动页上绘制一个椭圆。

 
Public Sub DrawOval_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 Set vsoShape = ActivePage.DrawOval(1.5, 10.5, 7.5, 6.5) 
 
End Sub

支持和反馈

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