求助，ACCESS窗口的隐藏

efcndi

昨天下载了红尘如烟的《完美标签下拉菜单——受5988143版主启发，也做了一个来玩玩》 ，然后把其他例子里面隐藏ACCESS窗口的方法加入其中，这个方法就是：
Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

Private Sub Form_Load()
    ShowWindow Me.Application.hWndAccessApp, 2
End Sub

以前试过很多次都是好使的，但是加到红尘如烟的文件里面，出现了问题，现在在正常启动时，的确是能隐藏窗口，但是一旦点击了主菜单后，隐藏掉的ACCESS马上就出现了，不知道为什么，求教了。
下面是红尘如烟的链接。
[窗体] 完美标签下拉菜单——受5988143版主启发，也做了一个来玩玩
下面是附件

Grant

登陆窗体可以用,在主窗体上不建议使用,如果要用你的窗体全部改为弹出和模式才行

efcndi

关键是还没点击菜单呢，只是点击了主菜单，ACCESS窗口就弹出来了。不是弹出和模式的问题，我试了。谢谢楼上。