Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/ms-access/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Ms access 在Access中创建自定义切换按钮_Ms Access_Vba - Fatal编程技术网

Ms access 在Access中创建自定义切换按钮

Ms access 在Access中创建自定义切换按钮,ms-access,vba,Ms Access,Vba,有没有办法在Access中创建自定义切换按钮?我希望创建一个开/关开关。内置的切换按钮功能强大 我已经在photoshop中创建了开/关/悬停图像。有没有一种方法可以将它们导入到代码中,使它们像内置的切换按钮一样工作?只有一种可能的方法(我相信有很多):- 将两个图像放入窗体上的图像控件中,并将它们排列在一起。 在每个控件的单击事件中,请使用以下内容:- Private Sub img1_Click() Me.img2.Visible = True Me.img1.Visible = False

有没有办法在Access中创建自定义切换按钮?我希望创建一个开/关开关。内置的切换按钮功能强大

我已经在photoshop中创建了开/关/悬停图像。有没有一种方法可以将它们导入到代码中,使它们像内置的切换按钮一样工作?

只有一种可能的方法(我相信有很多):-

将两个图像放入窗体上的图像控件中,并将它们排列在一起。 在每个控件的单击事件中,请使用以下内容:-

Private Sub img1_Click()
Me.img2.Visible = True
Me.img1.Visible = False
End Sub

Private Sub img2_Click()
Me.img1.Visible = True
Me.img2.Visible = False
End Sub

其中img1和img2是“打开”和“关闭”图像控件。您可以在窗体的加载事件中将其中一个控件设置为可见,并且可以通过检查控件的可见属性来判断“开关”的状态。

简单地调整图片属性应该足够容易,例如:

Private Sub Toggle0_Click()
    If Me.Toggle0 Then
        Me.Toggle0.Picture = "Z:\Docs\Picture1.bmp"
    Else
        Me.Toggle0.Picture = "Z:\Docs\Picture2.bmp"
    End If
End Sub

Access 2010有一个惊人的按钮编辑器,其组合以及光晕和阴影效果令人惊叹。在输入这句话的时间更短的情况下,我制作了以下切换按钮:

在上面,按钮的区别在于按钮按下与否(因此,上面的深蓝色示例是那些按下的按钮)

下面是Access中用于创建上述内容的内置工具的屏幕帽–我没有使用任何第三方工具来构建上述内容。正如其他人在这里指出的,您可以使用按钮包含图像


在MS Access 2010中,您当然可以将图像添加到切换按钮中,您需要.bmp