共用方式為


Shapes.AddConnector 方法 (Publisher)

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

語法

運算式AddConnector (TypeBeginXBeginYEndXEndY)

expression 代表 Shapes 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Type 必要 MsoConnectorType 新增連接線的類型。 可以是 MsoConnectorType 常數之一,但 msoConnectorTypeMixed除外,不搭配此方法使用。
BeginX 必要 Variant 連接線起始點的 x 軸。
BeginY 必要 Variant 連接線起始點的 y 軸。
EndX 必要 Variant 連接線結束點的 x 軸。
EndY 必要 Variant 連接線結束點的 y 軸。

傳回值

圖形

註解

針對 BeginXBeginYEndXEndY 參數,數值會以 點為單位進行評估;字串可以是 Microsoft Publisher (支援的任何單位,例如「2.5 in」) 。

新連接器無法連線至任何其他圖形 ;使用 BeginConnectEndConnect 方法來連線至另一個圖形的新的連接器。

範例

下列範例會新增直線連接線到使用中出版物的首頁。

Dim shpConnect As Shape 
 
Set shpConnect = ActiveDocument.Pages(1).Shapes.AddConnector _ 
 (Type:=msoConnectorStraight, _ 
 BeginX:=144, BeginY:=144, _ 
 EndX:=180, EndY:=72)

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應