CorelDRAW VBA - 在图层上创建一个椭圆形状 Layer.CreateEllipse

Layer.CreateEllipse方法用来在图层上创建椭圆形状,本文演示在页面的左下角创建一个矩形,其中包含一个红色椭圆。

参数说明

参数 描述
Left 在文档单位中,指定从椭圆左侧到页面框架左侧的距离
Top 在文档单位中,指定从椭圆顶部到页面框架顶部的距离
Right 在文档单位中,指定从椭圆的右侧到页面框架的右侧的距离
Bottom 在文档单位中,指定从椭圆底部到页面框架底部的距离
StartAngle 指定椭圆的起始角的度数。此参数是可选的,其默认值为90。
EndAngle 指定椭圆的结束角的角度。改变起始角会改变椭圆的形状。此参数是可选的,其默认值为90。
Pie 指定是否将椭圆更改为饼图。此参数是可选的,其默认值为False。

VBA参考代码

下面的VBA示例在页面的左下角创建一个矩形,其中包含一个红色椭圆。

' 声明变量
Dim s As Shape
Dim lr As Layer
' 获得当前活动图层
Set lr = ActiveLayer
' 设置绘制原点坐标
ActiveDocument.DrawingOriginX = -ActivePage.SizeWidth / 2
ActiveDocument.DrawingOriginY =
相关推荐
©️2020 CSDN 皮肤主题: 护眼 设计师:闪电赇 返回首页
实付 9.90元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值