以MDI形式打开一个CHILD

Question

我从 stackoverflow

中找到了以下代码

当我在项目中执行 MDIParent表单作为第一个表单时，它正常工作

For Each f As Form In Application.OpenForms
  If TypeOf f Is Form1 Then
    f.Activate()
    Return
  End If
Next

Dim myChild As New Form1
myChild.MdiParent = Me
myChild.Show()

我需要打开 LOGIN表单作为第一个表单并打开MDIParent。

如果我打开登录表单作为第一个表单上面的代码它不工作..需要一个解决方案

我将此代码添加到按钮控件

Answer 1

将您的登录表单设置为项目的开始表单。

在您的按钮上，显示MDI表格（如果您愿意，请关闭登录表格）

MDI_Main.Show()
Me.Dispose()

然后打开您的MDI子表单，使用以下代码：

frmChild.MdiParent = Me
frmChild.Show()

这是您需要的所有代码。