返回或设置指定线段终点一端的箭头样式。MsoArrowheadStyle,可读写。
| MsoArrowheadStyle 可以是下列 MsoArrowheadStyle 常量之一: | 
| msoArrowheadNone | 
| msoArrowheadOval | 
| msoArrowheadStyleMixed | 
| msoArrowheadDiamond | 
| msoArrowheadOpen | 
| msoArrowheadStealth | 
| msoArrowheadTriangle | 
expression.EndArrowheadStyle
expression 必需。该表达式返回“应用于”列表中的一个对象。
该示例为活动文档添加一条线段。线段的起点有一个短且窄的椭圆,终点有一个长且宽的三角形。
Dim docActive As Document
Set docActive = ActiveDocument
With docActive.Shapes.AddLine(100, 100, 200, 300).Line
    .BeginArrowheadLength = msoArrowheadShort
    .BeginArrowheadStyle = msoArrowheadOval
    .BeginArrowheadWidth = msoArrowheadNarrow
    .EndArrowheadLength = msoArrowheadLong
    .EndArrowheadStyle = msoArrowheadTriangle
    .EndArrowheadWidth = msoArrowheadWide
End With