通过

TextRange2.BoundTop 属性 (Office)

获取指定文本的文本边界框的顶部坐标（以 磅为单位）。 此为只读属性。

语法

表达式。BoundTop

表达 返回 TextRange2 对象的表达式。

返回值

单精度

备注

文本边界框与 TextFrame 对象不同。 TextFrame 对象表示文本可以驻留的容器。 文本边界框表示紧挨着文本的外围。

示例

本示例将向幻灯片中添加一个与文本边界框具有相同尺寸的圆角矩形。

With ActivePresentation.Slides(1).Shapes(1) 
 Set txb = .TextFrame.Text 
 Set roundRect = .AddShape(ppShapeRoundRect, _ 
 txb.BoundLeft, txb.BoundTop, txb.BoundWidth, txb.BoundHeight) 
 roundRect.Fill.Transparency = 0.25 
End With

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。