通过

FillFormat.GradientDegree Property

  • 项目
Word Developer Reference

Returns a value that indicates how dark or light a one-color gradient fill is. Read-only Single.

Syntax

expression.GradientDegree

expression   A variable that represents a FillFormat object.

Remarks

A value of 0 (zero) means that black is mixed in with the shape's foreground color to form the gradient; a value of 1 means that white is mixed in; and values between 0 and 1 mean that a darker or lighter shade of the foreground color is mixed in.

Use the OneColorGradient method to set the gradient degree for the fill.

Example

This example adds a rectangle to the active document and sets the degree of its fill gradient to match that of the shape named "Rectangle 2." If Rectangle 2 doesn't have a one-color gradient fill, this example fails.

Visual Basic for Applications 
  Dim docActive As Document
Dim sngGradient As Single

Set docActive = ActiveDocument
With docActive.Shapes
sngGradient = .Item("Rectangle 2").Fill.GradientDegree


With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill
    .ForeColor.RGB = RGB(0, 128, 128)
    .OneColorGradient msoGradientHorizontal, 1, sngGradient



End With
End With

See Also