Publisher) (FillFormat.GradientDegree 屬性

會傳回 單一 表示單色漸層填滿的深或淺方式。 值為 0 (零) 表示黑色經過混合使用圖形的前景色彩設定為表單之漸層;值為 1 表示該白皮書混合中 ；與值介於 0 與 1 濃或淺灰色的網底的前景色彩混合中的平均數。 唯讀。

語法

運算式。GradientDegree

表達 代表 FillFormat 物件的 變數。

傳回值

單一

註解

使用 OneColorGradient 方法，即可設定填滿的漸層程度。

範例

在目前出版物中新增一個矩形，並將其填滿設為與 [Rectangle 2] 圖案一樣的漸層程度。 如果 [Rectangle 2] 沒有單色漸層填滿，則本範例將產生錯誤。

Dim sngDegree As Single 
 
With ActiveDocument.Pages(1).Shapes 
 ' Store degree of one-color gradient. 
 sngDegree = .Item("Rectangle 2").Fill.GradientDegree 
 ' Add new rectangle. 
 With .AddShape(msoShapeRectangle, 0, 0, 40, 80).Fill 
 ' Set color and gradient for new rectangle. 
 .ForeColor.RGB = RGB(128, 0, 0) 
 .OneColorGradient Style:=msoGradientHorizontal, _ 
 Variant:=1, Degree:=sngDegree 
 End With 
End With 

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。