Office中国论坛/Access中国论坛

标题: 用SHOWWINDOW隐藏和显示窗口，显示后工具栏、菜单栏不见了 [打印本页]

作者: 老鬼 时间: 2012-8-30 09:48
标题: 用SHOWWINDOW隐藏和显示窗口，显示后工具栏、菜单栏不见了
用API函数SHOWWINDOW来隐藏和显示窗口，可是显示后原有的工具栏、菜单栏不见了，自定义的工具栏、菜单栏也不见了，为什么？
见附件效果。

作者: andymark 时间: 2012-8-30 10:28
Private Sub ok_Click()
On Error GoTo err_login

   ShowWindow Me.Application.hWndAccessApp, 3

      Me.Visible = False
      DoCmd.OpenForm "test"

把ShowWindow Me.Application.hWndAccessApp, 3
改成
ShowWindow Me.Application.hWndAccessApp, 5

作者: 老鬼 时间: 2012-8-30 11:07

andymark 发表于 2012-8-30 10:28
Private Sub ok_Click()
On Error GoTo err_login

原来如此，3Q3Q~

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)