返回介绍

Drop 属性

发布于 2019-10-04 14:09:07 字数 738 浏览 932 评论 0 收藏 0

对于显式设置了垂直距离的标注,该属性返回从文本框边缘到标注线连接位置的垂直距离(以磅为单位)。该距离通常从文本框顶端测量,但当AutoAttach 属性值设为True 且文本框位于标注线源位置(该标注所指向的位置)的左侧时,该垂直距离从文本框底端测量。只读。Single 类型。

说明

使用CustomDrop 方法设置该属性值。

只有在标注明确地设置了垂直距离,即DropType 属性的值为msoCalloutDropCustom 时,此项属性值才会准确地反映连在文本框上的标注线的位置。

示例

本示例用一或两个预设的下沉替换myDocument 中第一个形状的自定义下沉,这依赖于自定义垂直距离是否大于或小于标注文本框高度的一半。要使本示例执行,第一个形状必须是标注。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).Callout
 If .DropType = msoCalloutDropCustom Then
 If .Drop < .Parent.Height / 2 Then
 .PresetDrop msoCalloutDropTop
 Else
 .PresetDrop msoCalloutDropBottom
 End If
 End If
End With

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

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

发布评论

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