建立 MDIChild 既 Form

 

   建立 MDIChild 既 Form
 
   Private Sub StaffToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles StaffToolStripMenuItem.Click
      Dim NewForm As New Staff_StaffReport()
      NewForm.MdiParent = Me
      NewForm.Visible = True
      NewForm.WindowState = FormWindowState.Maximized
   End Sub