共用方式為


Shapes.AddLine 方法 (Publisher)

將代表線條的新 Shape 物件加入至指定 的 Shapes 集合。

語法

運算式AddLine (BeginXBeginYEndXEndY)

expression 代表 Shapes 物件的變數。

參數

名稱 必要/選用 資料類型 描述
BeginX 必要 Variant 行起始點的 x 軸。
BeginY 必要 Variant 行起始點的 y 軸。
EndX 必要 Variant 行結尾點的 x 軸。
EndY 必要 Variant 行結尾點的 y 軸。

傳回值

圖形

註解

針對 BeginXBeginYEndXEndY 引數,數值會以 點為單位進行評估;字串可以是 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 支援與意見反應