设为首页  加入收藏 
网上投稿 网站地图
您现在的位置: 天添资源网 >> 电脑网络 >> 数 据 库 >> MSAccess >> 正文

隐藏 Access 窗口

本站文章非会员原创,如果侵犯了你的权利请联系13978471165
作者:佚名    电脑来源:中国站长站    点击数:    更新时间:2006-8-11

Global Const SW_HIDE = 0
Global Const SW_SHOWNORMAL = 1
Global Const SW_SHOWMINIMIZED = 2
Global Const SW_SHOWMAXIMIZED = 3

Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

Function fSetAccessWindow(nCmdShow As Long)
' 使用举例
' 最大化 Access 窗口
' ?fSetAccessWindow(SW_SHOWMAXIMIZED)
' 最小化 Access 窗口
' ?fSetAccessWindow(SW_SHOWMINIMIZED)
' 隐藏 Access 窗口
' ?fSetAccessWindow(SW_HIDE)
' 正常显示 Access 窗口
' ?fSetAccessWindow(SW_SHOWNORMAL)
'
Dim loX As Long
Dim loForm As Form
On Error Resume Next
loX = ShowWindow(hWndAccessApp, nCmdShow)
Err.Clear
fSetAccessWindow = (loX <> 0)
End Function


  • 上一个电脑:

  • 下一个电脑:
  • ■■相 关 文 章: 网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)
    中小系统.net DataAccess数据访问…
    MapX从数据库读取数据形成新图层
    程序集应该拥有一个有效的强名称
    一个Web文件上传的C#源代码
    程序控制开始菜单的弹出 C#
    .NET中使用datagrid实现的简单分…
    c#重点知识详解(六)
    关于我们 | 联系我们 | 客户服务 | 申请链接 | 合作联盟 | 诚征代理 | 诚聘英才
      www.ttzyw.com
    备案序号:桂ICP备号