返回介绍

BeginConnectionSite 属性

发布于 2019-10-04 14:08:48 字数 766 浏览 796 评论 0 收藏 0

返回一个整数,该整数指定连接符起点的连接位置。只读。Long 类型。

注意如果指定的连接符起点并未连接到形状上,则该属性产生一个错误。

示例

本示例假定活动演示文稿的第一张幻灯片已经包含两个形状,且通过连接符“Conn1To2”相连。而示例中的代码会向第一张幻灯片中添加一个矩形框和一个连接符。这个新建的连接符起点将连接到与“Conn1To2”的起点相同的地方。终点则连接到新建的矩形框的第一个连接点上。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
 Set r3 = .AddShape(msoShapeRectangle, 450, 190, 200, 100)
 .AddConnector(msoConnectorCurve, _
 0, 0, 10, 10).Name = "Conn1To3"
 With .Item("Conn1To2").ConnectorFormat
 beginConnSite1 = .BeginConnectionSite
 Set beginConnShape1 = .BeginConnectedShape
 End With
 With .Item("Conn1To3").ConnectorFormat
 .BeginConnect beginConnShape1, beginConnSite1
 .EndConnect r3, 1
 End With
End With

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。
列表为空,暂无数据
    我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
    原文