返回或设置由 Index 参数指定的调整值。对于线形调整,调整值 0.0 通常对应于图形的左边或上边,而值 1.0 通常对应于图形的右边或下边。但是对于一些图形来说,调整值可以超出图形的边界。对于射线形调整,调整值 1.0 对应于图形的宽度。对于角度调整,调整值以角度进行指定。Item 属性仅应用于带有调整控点的图形。Single 类型,可读写。
expression.Item(Index)
expression 必需。该表达式返回一个 Adjustments 对象。
Index Long 类型,必需。调整值的索引序号。
“自选图形”和“艺术字”对象最多可有八种调整方式。
本示例向活动文档添加两个十字形形状,并为每一个十字形设置第一种调整值(对于此类“自选图形”,该调整方式是唯一的)。
Dim docActive As Document Set docActive = ActiveDocument
With docActive.Shapes .AddShape(msoShapeCross, _ 10, 10, 100, 100).Adjustments.Item(1) = 0.4 .AddShape(msoShapeCross, _ 150, 10, 100, 100).Adjustments.Item(1) = 0.2 End With
尽管本示例没有明确使用 Item 属性,但能得到与上一示例相同的结果。
Dim docActive As Document Set docActive = ActiveDocument
With docActive.Shapes .AddShape(msoShapeCross, _ 10, 10, 100, 100).Adjustments(1) = 0.4 .AddShape(msoShapeCross, _ 150, 10, 100, 100).Adjustments(1) = 0.2 End With