Word VBA教程:BeginArrowheadWidth属性

返回或设置指定线段起点一端的箭头宽度。MsoArrowheadWidth,可读写。

MsoArrowheadWidth 可以是下列 MsoArrowheadWidth 常量之一:
msoArrowheadNarrow
msoArrowheadWidthMedium
msoArrowheadWide
msoArrowheadWidthMixed

expression.BeginArrowheadWidth

expression   必需。该表达式返回“应用于”列表中的一个对象。

VBA示例

本示例为活动文档添加一条线段。线段的起点有一个短且窄的椭圆,终点有一个长且宽的三角形。


Dim docFirst As Document
Set docFirst =Documents(1)
With docFirst.Shapes.AddLine(100, 100, 200, 300).Line
    .BeginArrowheadLength = msoArrowheadShort
    .BeginArrowheadStyle = msoArrowheadOval
    .BeginArrowheadWidth = msoArrowheadNarrow
    .EndArrowheadLength = msoArrowheadLong
    .EndArrowheadStyle = msoArrowheadTriangle
    .EndArrowheadWidth = msoArrowheadWide
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号