access打开窗体问题

有时候我们需要隐藏ACCESS数据库的主窗口,比如在程序登录窗口,这时有两种方法可以达到这个要求.

1.采用ShowWindow 函数:

首先在模块中声明下面的代码:

Option Explicit

Private Declare Function ShowWindow Lib "user32" _

(ByVal hwnd As

Long, ByVal nCmdShow As Long) As Long

然后在窗体加载代码中调用:

ShowWindow Me.Application.hWndAccessApp, 0'隐藏

当需要恢复时,使用下面的代码:

ShowWindow Me.Application.hWndAccessApp, 1'不隐藏,即恢复

2.使用最小化命令,将窗体设置"d出"方式为"是"

DoCmd.RunCommand acCmdAppMinimize

恢复代码:

DoCmd.RunCommand acCmdAppMaximize

也可以到我们网站搜索“隐藏”关键字，有很多这方面的示例和文章

点击左上角微软图标，选择“ACCESS 选项”，d出窗口中点选左侧的“当前数据库”。

右侧的“显示窗体”选你要打开的窗体；去掉“允许全部菜单”、“允许默认快捷菜单”等前面的勾（还要去掉一些功能前面的勾，比如“显示导航窗格”，这里不再一一列举，自己摸索下）；同时，你还可以添加“应用程序标题”、“应用程序图标”等，使你的 ACCESS 显得更加专业。

---