以磅为单位返回或设置指定线的粗细。可读写。Single 类型。
本示例将一条两磅粗的绿色虚线添加到 myDocument
。
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes.AddLine(10, 10, 250, 250).Line
.DashStyle = msoLineDashDotDot
.ForeColor.RGB = RGB(0, 255, 255)
.Weight = 2
End With