需要从非MDI儿童表单中打开MDI子表单

Question

在这种情况下，我将使用以下代码在MDI父级之外打开表单：

Dim frm As New frmSpeedSearch
frm.Show(Me)

然后，我希望能够从这个frmSpeedSearch中打开MDI子级。FrmMain是所有子窗体的MDI父级。在frmSpeedSearch中，我打了以下电话：

Dim frm As New frmStorePage(_store)
frm.Owner = frmMain
frm.Show()

但这只是正常打开表单。我如何将它推回MDI父容器中？

在frmStorePage中，我调用MdiParent失败，因为当我以这种方式打开表单时，它没有MDI父级

Dim frm As frmDashBoard
frm = DirectCast(Me.MdiParent, frmMain)

如有任何建议，将不胜感激。

Answer 1

调用Show()时将MdiParent传递给frmSpeedSearch。

因此，你可以：

Dim frm As New frmStorePage(_store)
frm.MdiParent = Me.Owner
frm.Show()