MDI + MenuStrip 使用方法

MDI + MenuStrip 使用方法

Form1.vb (MDI Parent)

   Private Sub AToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) _
   Handles AToolStripMenuItem1.Click
      Dim NewForm As New Form2
      NewForm.MdiParent = Me
      NewForm.Visible = True
      NewForm.WindowState = FormWindowState.Maximized
   End Sub