共用方式為

ShapeRange.GetTop 方法 (Publisher)

  • 發行項

傳回圖形或圖形範圍的上邊緣與目前檢視中最左側頁面上邊緣的距離，以 指定 的單位單一表示。

語法

運算式。GetTop (單元)

表達 代表 ShapeRange 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
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 支援與意見反應。