将Label BackColor更改为默认值

Kje*_*nos 2 vba userform

我想知道如何将UserForm中标签的背景颜色更改回默认值?(透明或类似UserFormcolor)

Info_Label.BackColor = xlTransparent
Run Code Online (Sandbox Code Playgroud)

要么

Info_Label.BackColor = xlNone
Run Code Online (Sandbox Code Playgroud)

不起作用.

Gar*_*eth 9

如果您希望标签是透明的,则需要设置BackStyle属性,如下所示:

'Transparent
Info_Label.BackStyle = 0

'Opaque
Info_Label.BackStyle = 1
Run Code Online (Sandbox Code Playgroud)

或者,将标签返回BackColor默认颜色:

Info_Label.BackColor = vbButtonFace
Run Code Online (Sandbox Code Playgroud)


Ale*_* K. 5

默认颜色是枚举值,vbButtonFace因此:

Info_Label.BackColor = vbButtonFace
Run Code Online (Sandbox Code Playgroud)

或者匹配当前的表格:

Info_Label.BackColor = me.BackColor
Run Code Online (Sandbox Code Playgroud)

  • Gareth提到了透明度,这可能是最简单的方法. (2认同)