CorelDRAW VBA - 使用指定的控制点坐标在图层的指定位置创建曲线段 Layer.CreateCurveSegment2

Layer.CreateCurveSegment2方法使用指定的控制点在图层的指定位置上坐标创建曲线段。本文演示在当前活动图层上创建一条曲线并沿着曲线添加一个文本“曲线上的文本”,然后将文本居中放置。

参数说明

参数 描述
x1 指定曲线段起始点的x坐标。此值以文档单位度量。
y1 指定曲线段起始点的y坐标。此值以文档单位度量。
StartingControlPointX 指定起始控制点的x坐标
StartingControlPointY 指定起始控制点的y坐标
EndingControlPointX 指定结束控制点的x坐标
EndingControlPointY 指定结束控制点的y坐标
x2 指定曲线段终点的x坐标。此值以文档单位度量。
y2 指定曲线段终点的y坐标。此值以文档单位度量。

VBA参考代码

下面的VBA示例在当前活动图层上创建一条曲线并沿着曲线添加一个文本“曲线上的文本”,然后将文本居中放置。

' 声明变量
Dim sText As Shape, sPath As Shape
' 创建美术字文本
Set sText = ActiveLayer.CreateArtisticText(0, 0, "曲线上的文本")
' 创建曲线段
Set sPath = ActiveLa
相关推荐
©️2020 CSDN 皮肤主题: 护眼 设计师:闪电赇 返回首页
实付 9.90元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

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

余额充值