GradientStops.Delete 方法 (Office)

删除渐变光圈。

语法

表达式删除 (索引)

表达 返回 GradientStops 对象的表达式。

参数

名称 必需/可选 数据类型 说明
Index 可选 Integer 渐变光圈的索引号。

备注

渐变是指从一种颜色状态到另一种颜色状态的平缓过渡。 这些部分的端点称为光圈。

示例

下面的示例添加三个渐变颜色光圈,然后删除第一个渐变光圈。

Sub gradients() 
 Set myDocument = ActivePresentation.Slides(1) 
 Set GradientShapeFill = myDocument.Shapes.AddShape(msoShapeRectangle, 90, 90, 90, 80).Fill 
 With GradientShapeFill 
 .ForeColor.RGB = RGB(0, 128, 128) 
 .OneColorGradient msoGradientHorizontal, 1, 1 
 .GradientStops.Insert RGB(255, 0, 0), 0.25 
 .GradientStops.Insert RGB(0, 255, 0), 0.5 
 .GradientStops.Insert RGB(0, 0, 255), 0.75 
 End With 
 GradientShapeFill.GradientStops.Delete (1) 
End Sub

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。