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

有时候我们需要隐藏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,学习、备用。

版权声明:
作者:水东柳
链接:http://shuidl.com/1569.html
来源:水东柳博客
文章版权归作者所有,未经允许请勿转载。

THE END
分享
二维码
打赏
< <上一篇
下一篇>>