Dzwebs.Net

撰写电脑技术杂文十余年

VBA之AddLine 方法

Admin | 2015-3-1 10:52:57 | 被阅次数 | 9760

温馨提示!

如果未能解决您的问题,请点击搜索;登陆可复制文章,点击登陆

  AddLine 方法

  expression.AddLine(BeginX, BeginY, EndX, EndY)

  expression  必选。该表达式返回“应用于”列表中的对象之一。

  BeginX 必选。Single 类型。线条起点相对于幻灯片左边缘的水平位置(以磅为单位)。

  BeginY  必选。Single 类型。线条起点相对于幻灯片上边缘的垂直位置(以磅为单位)。

  EndX  必选。Single 类型。线条终点相对于幻灯片左边缘的水平位置(以磅为单位)。

  EndY  必选。Single 类型。线条终点相对于幻灯片上边缘的垂直位置(以磅为单位)。

  示例:本示例向 myDocument 中添加蓝色的虚线。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddLine(BeginX:=10, BeginY:=10, _
        EndX:=250, EndY:=250).Line
    .DashStyle = msoLineDashDotDot
    .ForeColor.RGB = RGB(50, 0, 128)
End With


该杂文来自: PowerPoint杂文

上一篇:VBA之AddLabel 方法

下一篇:VBA之AddMediaObject 方法

网站备案号:

网站备案号:滇ICP备11001339号-7

版权属性:

Copyright 2007-2021-forever Inc. all Rights Reserved.

联系方式:

Email:dzwebs@126.com QQ:83539231 访问统计