通过

Word) (Adjustments.Item 属性

  • 项目

返回或设置 Index 参数指定的调整值。 读/写 Single。

语法

表达式。项 (索引)

表达 返回“Adjustments”对象的表达式。

参数

名称 必需/可选 数据类型 说明
Index 必需 Long 调整的索引号。

备注

对于线性调整，调整值 0.0 通常对应于图形的左边或上边边缘，值 1.0 通常对应于图形的右边或下边边缘。 但是，调整值可以超出形状的边界的一些形状。 对于径向调整，调整值 1.0 对应于图形的宽度。 对于角度调整，调整值以度为单位指定。 Item 属性仅适用于具有调整的形状。 自选图形和艺术字具有 8 个调整。

示例

本示例向活动文档添加两个十字形形状，并为每一个十字形设置第一种调整值（对于此类"自选图形"，该调整方式是唯一的）。

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

另请参阅

调整对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。