是否可以完全删除Access中的切换按钮的背景颜色和边框?正如Imgur图片中所示,我想完全删除灰色背景和按钮的边框,所以我只保留白色图标(该列表图标)。这甚至可能吗?
答案 0 :(得分:0)
我确信这与您在MS Access ToggleButton Picture change的其他问题有关。
使用带有嵌入式图像和此代码的图像控件(注意标题中的公共变量声明):
Option Compare Database
Option Explicit
Public booMenu
Sub timeout(duration_ms As Double)
Dim Start_Time As Double
Start_Time = Timer
Do
DoEvents
Loop Until (Timer - Start_Time) >= duration_ms
End Sub
Private Sub Image5_Click()
Dim x As Integer
booMenu = Not booMenu
Me.Menu.Visible = True
Do
DoEvents
Me.Menu.Width = Me.Menu.Width + IIf(booMenu, 200, -200)
Me.Menu.Left = Me.Menu.Left - IIf(booMenu, 200, -200)
Me.Image5.Left = Me.Image5.Left - IIf(booMenu, 200, -200)
timeout (0.01)
x = x + 1
Loop Until x = 10
Me.Menu.Visible = booMenu
End Sub
答案 1 :(得分:0)
我设法找到(有点)解决方案。解决方案是更改以下参数:
Use Theme = No;
BackColor = Form Color;
Pressed Back Color = Form Color
最终,它提供的效果与我试图实现的效果非常相似。