none
vb6.0 多文档MDI窗体模式下菜单问题,怎么实现打开MDI子窗体,别让MDI子窗体上的菜单替换MDI主窗体上的菜单 RRS feed

  • 问题

  • 现在采用的是MDI窗体模式,出现的问题如下:
    form1是一个MDI窗体。form2的MDIChild=True
    form1上面有菜单栏它的属性是可视的。
    form2上面也有菜单栏它的属性是不可视的。

    操作流程
    1.加载form1
    2.单击form1上的一个菜单然后加载form2

    问题: form1上的菜单不见了。(因为form2上的菜单是不可视的所以现在form1上没有任何菜单项)
    想要实现的效果:form1上的菜单保持不变!


    时刻都在努力学习!
    2009年11月22日 6:39

答案

  • 在MDIFORM窗体上画一个TIMER控件,Interval属性设为10

    Private Sub Timer1_Timer()
      '只要有子窗体存在,就隐藏菜单,否则MDIFORM菜单就显现
      菜单名.Visible = Me.ActiveForm Is Nothing'子菜单可以不管它
    End Sub

    不知道这样适不适合你

    • 已标记为答案 张三宾 2009年11月24日 4:17
    2009年11月22日 11:09

全部回复