返回介绍

BoundWidth 属性

发布于 2019-10-04 14:08:49 字数 559 浏览 983 评论 0 收藏 0

全部显示

以磅为单位返回指定文本框的文本边界框的宽度。只读。Single 类型。

示例

本示例在当前演示文稿的第一张幻灯片中添加一个圆角矩形,该矩形与第一个形状的文本边界框的大小相同。

With Application.ActivePresentation.Slides(1).Shapes
 Set tr = .Item(1).TextFrame.TextRange
 Set roundRect = .AddShape(msoShapeRoundedRectangle, _
 tr.BoundLeft, tr.BoundTop, tr.BoundWidth, tr.BoundHeight)
End With
With roundRect.Fill
 .ForeColor.RGB = RGB(255, 0, 128)
 .Transparency = 0.75
End With

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

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

发布评论

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