mdi窗体内的窗体如何只有一个打开????

基于MDI窗体的程序,当我在菜单中打开一个窗体的时候,如何限制菜单其他的窗体不被打开,即在MDI窗体中只能有一个子窗体被打开,直至关闭了当前的子窗体才能打开其他的

解决方案 »

  1.   

    菜单事件下：On Error Resume Next
    Dim frmCount As Integer
    frmCount = Me.ActiveForm.Count
    If frmCount = 0 Then
        FormXXX.Show
    End If
      

  2.   

    一个笨办法就是sdi窗体加载的时候把其他窗体hide，呵呵，真是很笨
    还有种方法就是用api函数查询子窗体类，不过没做过，不能乱说
      

  3.   

    可以设置一个全局的bool变量，在打开子窗体的时候，变量设置True，子窗体关闭时，变量设置为False
    打开某个子窗体前，先判断变量的值，如果为True，则不打开窗体，如果为False，则打开窗体