用指定量改变图片的对比度。使用 Contrast 属性设置图片的绝对对比度。
expression.IncrementContrast(Increment)
expression 必选。该表达式返回一个 PictureFormat 对象。
Increment 必选。Single 类型。指定图片 Contrast 属性值的改变量。正值加强对比度,负值减弱对比度。
调整图片的对比度不能超出 Contrast 属性的上下限。例如,如果 Contrast 属性初始设为 0.9 并将 Increment 参数指定为 0.3,则结果对比度为 1.0(Contrast 属性的上限)而不是 1.2。
本示例对 myDocument
上还没有设置为最大对比度的所有图片增加对比度。
Set myDocument = ActivePresentation.Slides(1)
For Each s In myDocument.Shapes
If s.Type = msoPicture Then
s.PictureFormat.IncrementContrast 0.1
End If
Next