隐藏access数据库主窗口的方法\DoCmd.RunCommand acCmdAppMinimize

时　间:2004-09-24 00:00:00
作　者:竹笛   ID：8  城市：上海  QQ：2851379730
摘　要:两种隐藏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.使用最小化命令,将窗体设置"弹出"方式为"是"

   DoCmd.RunCommand acCmdAppMinimize

   恢复代码:

   DoCmd.RunCommand acCmdAppMaximize

Access软件网QQ交流群 (群号:54525238) 　　　　　　Access源码网店