hi,大家好呀!
今天想着给大家分享点啥呢?最近几个月断更的有些“勤快”了,那就给大家分享个几行代码。
当我们在access中开发完成后,为了让我们的系统更加的像一个系统,我们会把access的功能区,导航区,状态栏都给隐藏起来。一般我们都是这么操作的。
01、隐藏状态栏
我们先来隐藏导航栏。首先,我们要知道哪里是状态栏,如下图:

手工配置:
打开Access选项(选项的位置在文件——>选项),选择当前数据,把显示状态栏的勾选去掉,然后点击确定,最后重新启动一下Access。

如果用代码:
'显示Application.SetOption "Show Status Bar", True'隐藏Application.SetOption "Show Status Bar", False
02、隐藏功能区
功能区是哪一块呢?如下图,下图就是Access的功能区,如果要隐藏,那我们也需要写一行代码

代码:
'隐藏功能区DoCmd.ShowToolbar "Ribbon", acToolbarNo'显示功能区DoCmd.ShowToolbar "Ribbon", acToolbarYes
03、隐藏导航区
最后我们来看一下隐藏导航区。那哪里是导航区呢,如下图:

手工配置:
还是一样先打开Access选项,选择当前数据,滚轮往下滚,找到显示导航窗格,把勾选去掉,然后点击确定,最后重新启动一下Access。

代码:
'隐藏DoCmd.SelectObject acForm, , TrueDoCmd.RunCommand acCmdWindowHide'显示DoCmd.SelectObject acForm, , TrueDoCmd.RunCommand acCmdWindowUnhide
全部隐藏的效果是这样的。这样就只显示自己做的窗体。

好了,大家快去试一下吧。



















