Solo una instancia de cada menu, en vb.net

[klaudio83]

Holas, espero me den una ayuda con esto.
Estoy trabajando con Visual Studio 2008 y desarrollando con vb.net.

Tengo un winform(inicio.vb) con botones que abren sus respectivos menus (menu_clientes.vb, menu_productos.vb y menu_facturas.vb), tengo activada la opcion de IsmdiContainer de inicio.vb.

Lo que necesito es: al apretar el boton de por ejemplo productos, me abra el menu_productos.vb, pero si apreto nuevamente este boton no me abra otra instancia de este menu.

y tambien necesito que: si por ejemplo tengo ya abierto el menu_productos.vb y despues abro menu_clientes.vb ,este va a quedar por encima del menu_productos.

Entonces al apretar nuevamente el boton para abrir el menu productos, la idea es que este se ponga por encima de cualquier otro menu que este abierto, sin abrir otra instancia de este mismo menu, como mencionaba.

Dejo el codigo como abro actualmente estos menus

Código vb.net:

Private Sub NavBarItem1_LinkClicked(ByVal sender As Object, ByVal e As DevExpress.XtraNavBar.NavBarLinkEventArgs) Handles NavBarItem1.LinkClicked
        Dim menu_cli As New menu_clientes 
        menu_cli.MdiParent = Me
        menu_cli.Show()
        menu_cli.WindowState = FormWindowState.Maximized
    End Sub
 
    Private Sub NavBarItem3_LinkClicked(ByVal sender As Object, ByVal e As DevExpress.XtraNavBar.NavBarLinkEventArgs) Handles NavBarItem3.LinkClicked
        Dim menu_prod As New menu_productos
        menu_prod.MdiParent = Me
        menu_prod.Show()
        menu_prod.WindowState = FormWindowState.Maximized
    End Sub
 
    Private Sub NavBarItem2_LinkClicked(ByVal sender As Object, ByVal e As DevExpress.XtraNavBar.NavBarLinkEventArgs) Handles NavBarItem2.LinkClicked
        Dim menu_factu As New menu_facturas
        menu_factu.MdiParent = Me
        menu_factu.Show()
        menu_factu.WindowState = FormWindowState.Maximized
    End Sub
 

Espero me puedan ayudar con esto, Muchas Gracias

[eperedo]

Abre los formularios de esta forma:

Código vb.net:

My.Forms.menu_facturas.MdiParent = Me
My.Forms.menu_facturas.Show()
 

Saludos.

[klaudio83]

jajaja excelente Maestro
gracias master.
ReMuchas gracias