IncrementBrightness 方法

按指定数值改变图片亮度。可用 Brightness 属性设置图片的绝对亮度。

expression  必需。该表达式返回 PictureFormat 对象。

Increment   Single 类型，必需。指定图片 Brightness 属性的改变量。正数值增加图片亮度，负数值调暗图片。

说明

图片亮度的调整不能超出 Brightness 属性的上下界限。例如，如果最初将 Brightness 属性设为 0.9，并指定 Increment 参数为 0.3，则最后的亮度级不是 1.2，而是 Brightness 属性的最高界限，即 1.0。

示例

本示例实现的功能是：在活动文档中复制图形 1，然后移动并且调暗该复制图形。只有在图形 1 是一个图片或 OLE 对象时，本示例才有效。

Dim docActive As Document

Set docActive = ActiveDocument

With docActive.Shapes(1).Duplicate
    .PictureFormat.IncrementBrightness -0.2
    .IncrementLeft 50
    .IncrementTop 50
End With