建立 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 |