访问标签/形状的 VBA 背景颜色渐变

Posted 2023-04-19

【中文标题】访问标签/形状的 VBA 背景颜色渐变

【英文标题】：Access VBA Back Color Gradient For Label/Shape

【发布时间】：2014-09-03 14:44:26

【问题描述】：

我正在寻找一种在 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

【参考方案1】：

标签不能有渐变背景。

如果你想在按钮上设置渐变，你可以这样做similar to before。

button.Gradient = 12

【讨论】：

真糟糕。好吧，我有一个解决方法，我创建了一个带有我需要的渐变的图像，将 Visible 设置为“NO”，并在需要时通过 VBA 打开图像。我想这是很长的路要走。不过感谢您的建议！

按钮也可以用作标签，它可以响应主题的变化（如果发生这种情况）并且可以轻松调整大小。您只需要确保悬停/按下的颜色与正常的前/后颜色相同，这样当有人与之交互时它就不会改变它的外观（因为标签不会）。既有文本又有点击事件（一个按钮只有很多其他事件）

没有办法改变渐变的颜色吗？看起来只有一种颜色渐变。

我认为你是对的。如果你想要两种颜色，你需要按照自己的方式行事。据我所知，您可以选择一种颜色，然后访问会使它变暗或变亮。 ://