Private Sub PEGToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PEGToolStripMenuItem.Click
        Dim NomeForm As New Formciao
        NomeForm.MdiParent = Me 
        NomeForm.Show()
    End Sub