我在普通窗体上作过,跟你说的方法一样, MDIFORM子窗体没试过,估计不行,既然想让它总在最前面,就改一下属性,别当子窗体了可以吧

解决方案 »

  1.   

    我用以下代码实现所需MDIFORM子窗体显示在前面:If MyForm1.Visible = True Then
    MyForm1.SetFocus
    Else
    Load MyForm1
    End If也可将所需的窗体设成非MDIFORM子窗体,然后用你的代码让它总在最前面。
      

  2.   

    hwmys(hewei)的方法并不能保证MyForm1永在前面,设成非MDIFORM子窗体不见得好,因为我只需要这个窗体在这个程序的前面,但设成非MDIFORM子窗体后竟成为所有程序的前面,关掉MDIFORM后还孤零零在那里,很不好看。
    我现在是想在show这个form时,把其他form.visible=false(MDIFORM除外),但问题是,怎么知道目前有那些form在show?
      

  3.   

    MDIform1.show 1          '模态显示,窗体在本程序其他窗体前面
    '   
        For i = Forms.Count - 1 To 1 Step -1
            Forms(i).visible=false
        Next