本示例设置 myDocument 上图形 1 的亮度和对比度,图形 1 必须是一张图片或一个 OLE 对象。

Set myDocument = ActiveDocument
With myDocument.Shapes(1).PictureFormat
    .Brightness = 0.3
    .Contrast = .75
End With