删除渐变光圈。
语法
表达式。删除 (索引)
表达 返回 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。