Shapes.AddLine 方法 (Publisher)
將代表線條的新 Shape 物件加入至指定 的 Shapes 集合。
語法
運算式。AddLine (BeginX、 BeginY、 EndX、 EndY)
expression 代表 Shapes 物件的變數。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
BeginX | 必要 | Variant | 行起始點的 x 軸。 |
BeginY | 必要 | Variant | 行起始點的 y 軸。 |
EndX | 必要 | Variant | 行結尾點的 x 軸。 |
EndY | 必要 | Variant | 行結尾點的 y 軸。 |
傳回值
圖形
註解
針對 BeginX、 BeginY、 EndX和 EndY 引數,數值會以 點為單位進行評估;字串可以是 Microsoft Publisher (支援的任何單位,例如「2.5 in」) 。
範例
下列範例會新增一行到使用中出版物的首頁。
Dim shpLine As Shape
Set shpLine = ActiveDocument.Pages(1).Shapes.AddLine _
(BeginX:=144, BeginY:=144, _
EndX:=180, EndY:=72)
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。