共用方式為


PowerPoint (的 Shapes.AddLine 方法)

會建立線條。 會傳回 Shape 物件,代表新線段。

語法

expressionAddLine( _BeginX_, _BeginY_, _EndX_, _EndY_ )

expression 代表 Shapes 物件的變數。

參數

名稱 必要/選用 資料類型 描述
BeginX 必要 Single 相對於投影片的左緣,以點為單位指定線條起點的水平位置。
BeginY 必要 Single 相對於投影片的上緣,以點為單位指定線條起點的垂直位置。
EndX 必要 Single 相對於投影片的左緣,以點為單位指定線條終點的水平位置。
EndY 必要 Single 相對於投影片的上緣,以點為單位指定線條終點的垂直位置。

傳回值

圖形

範例

本範例在 myDocument 中新增藍色的虛線。

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes.AddLine(BeginX:=10, BeginY:=10, _
        EndX:=250, EndY:=250).Line
    .DashStyle = msoLineDashDotDot
    .ForeColor.RGB = RGB(50, 0, 128)
End With

另請參閱

Shapes 物件

支援和意見反應

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