Shape.GetTop 方法 (Publisher)

返回形状或形状区域的上边缘与当前视图中最左侧页面的上边缘的距离,以指定单位表示为 Single

语法

表达式GetTop (单元)

表达 一个代表 Shape 对象的变量。

参数

名称 必需/可选 数据类型 说明
Unit 必需 PbUnitType 要返回的距离的单位。 可以是 Microsoft Publisher 类型库中声明的 PbUnitType 常量之一。

返回值

单精度

备注

使用 GetLeft 方法返回形状或形状范围的左边缘与当前视图中最左边页面的左边缘之间的距离。

示例

以下示例显示从最左侧页面的左边缘和上边缘到形状范围的左边缘和上边缘的距离,该形状范围由第一页上的所有形状组成。 该距离按英寸表示(精确到百分位)。

With ActiveDocument.Pages(1).Shapes.Range 
 MsgBox "Distance from left: " _ 
 & Format(.GetLeft(Unit:=pbUnitInch), "0.00") _ 
 & " in" & vbCr _ 
 & "Distance from top: " _ 
 & Format(.GetTop(Unit:=pbUnitInch), "0.00") _ 
 & " in" 
End With

支持和反馈

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