如何在windows窗体中调用MDIParent？

Question

我有一个名为"MDIParent1“的MDI窗体，MDI子窗体"MDIChild1”，还有一个名为"FrmTest“的windows窗体。

现在在"MDIChild1“表单中有一个名为"btnTest”的按钮，下面是单击事件。

Dim V As New FrmTest
    V.MdiParent = MDIParent1
    V.Show()

但它无法加载"frmTest“表单。有没有其他方法可以做到这一点？提前谢谢。

Answer 1

试试这个：

    Dim V As New FrmTest
    V.MdiParent = Me.MdiParent
    V.Show()

以上代码假定MDIChild1.MdiParent已设置为MDIParent1

你也可以这样做：

    Dim V As New FrmTest
    V.MdiParent = Application.OpenForms("MDIParent1")
    V.Show()

要关闭其他窗体，请遍历MdiChildren集合：

    Dim MyMdiForm as Form = Application.OpenForms("MDIParent1")

    For Each Frm As Form In MyMdiForm.MdiChildren  

          If Frm IsNot V Then

                Frm.Close()

          End If

     Next