我正在寻找Access VBA中的一种方法,将标签,形状等的背景颜色设置为渐变。我目前正在应用纯色,但希望有一种方法可以通过渐变实现这一目标。
以下是我目前在Access中应用背景颜色的方法:
Label2.BackColor = RGB(119, 49, 65)
以下是我在Excel中使用的代码,将单元格填充为渐变,效果很好。但是,我不确定Access VBA究竟是如何工作的。建议指出我正确的方向?
Range("D14").Select
With Selection.Interior
.Pattern = xlPatternLinearGradient
.Gradient.Degree = 0
.Gradient.ColorStops.Clear
End With
With Selection.Interior.Gradient.ColorStops.Add(0)
.Color = 2786997
.TintAndShade = 0
End With
With Selection.Interior.Gradient.ColorStops.Add(1)
.Color = 1447704
.TintAndShade = 0
End With