GradientStyle 属性

返回指定填充的过渡样式。使用 OneColorGradient、PresetGradient 或 TwoColorGradient 方法设置填充的过渡样式。对未使用过渡的填充试图返回该属性将产生错误。使用 Type 属性决定该填充是否使用过渡。只读。MsoGradientStyle 类型。

expression  必选。该表达式返回“应用于”列表中的对象之一。

示例

本示例向 myDocument 中添加矩形，并设置该矩形的填充过渡样式，以匹配名为“rect1”的形状的过渡样式。要执行本示例，“rect1”必须使用过渡填充。

Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
    gradStyle1 = .Item("rect1").Fill.GradientStyle
    With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill
        .ForeColor.RGB = RGB(128, 0, 0)
        .OneColorGradient gradStyle1, 1, 1
    End With
End With