Access数据库主窗口隐藏的方法——DoCmd.RunCommand acCmdAppMinimize

共计 428 个字符，预计需要花费 2 分钟才能阅读完成。

有时候我们需要隐藏 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. 使用最小化命令, 将窗体设置 ” 弹出 ” 方式为 ” 是 ”

DoCmd.RunCommand acCmdAppMinimize

恢复代码:

DoCmd.RunCommand acCmdAppMaximize

摘自 http://www.accessoft.com，学习、备用。