Private Sub DostupniToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DostupniToolStripMenuItem.Click
        Dim frm As New FrmDostupniZaposlenici
        frm.MdiParent = Me
        frm.Show()
        frm.WindowState = FormWindowState.Maximized
    End Sub

Private Sub DodajToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DodajToolStripMenuItem.Click
    Dim frm As New frmDodajZaposlenika
    frm.MdiParent = Me
    frm.Show()
    frm.WindowState = FormWindowState.Maximized
End Sub

Private Sub DostupniToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DostupniToolStripMenuItem.Click
    FrmDostupniZaposlenici.MdiParent = Me
    FrmDostupniZaposlenici.Show()
    FrmDostupniZaposlenici.WindowState = FormWindowState.Maximized
End Sub

Private Sub DodajToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DodajToolStripMenuItem.Click
    frmDodajZaposlenika.MdiParent = Me
    frmDodajZaposlenika.Show()
    frmDodajZaposlenika.WindowState = FormWindowState.Maximized
End Sub

Private Sub IzmjeniToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles IzmjeniToolStripMenuItem.Click
    frmIzmjenaZaposlenika.MdiParent = Me
    frmIzmjenaZaposlenika.Show()
    frmIzmjenaZaposlenika.WindowState = FormWindowState.Maximized
End Sub

Private Sub ObrisiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ObrisiToolStripMenuItem.Click
    frmObrisiZaposlenika.MdiParent = Me
    frmObrisiZaposlenika.Show()
    frmObrisiZaposlenika.WindowState = FormWindowState.Maximized
End Sub

For Each f As Form In Me.MdiChildren
     f.Close()
Next