problema con mdiList

Hola a todos tengo el siguiente problema, estoy trabajando varios
modulos dentro de mi aplicacion (administrativo, contable, financiero ...
etc) El punto es que cada modulo tiene un menu diferente por lo tanto maneja
diferentes formas y cuando me paro sobre una forma tiene que mostrar el menu
del modulo correspondiente ... esto lo hace bien cuando hago por ejemplo:

Private Sub MiMenuItem_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MiMenuItem.Click

Dim NombreForm As String = "Forma Prueba"
Dim x As Integer
For x = 0 To (Me.MdiChildren.Length) - 1
If Me.MdiChildren(x).Name = NombreForm Then
Me.MdiChildren(x).Focus()
CargarMenuCorrespondiente()
Exit Sub
End If
Next x

z.MdiList = True
Dim frm As New FrmPrueba()
frm.MdiParent = Me
frm.Name = NombreForm
frm.Show()
End Sub

si hago esto cuando le hago click en el boton de un menu me trae la forma
que deberia y asi mismo el menu que corresponde

con el mdiList=true me va listando las formas que tengo abiertas y si le
hago click se va a la forma correspondiente como deberia lo que yo
quiero es que cuando tengo la lista de mis ventanas abiertas al hacer click
en una de ellas no solo me abra la ventana sino que tambien me llame el menu
correspondiente.

Existe algun evento o alguna forma de ver sobre que elemento de la lista de
ventanas abiertas(mdilist) se hizo click ?? un pequeño ejemplo podria
ser:

tengo un menu con archivo(nuevo,abrir) y edicion(copiar,pegar) ... y el menu
de edicion tiene la propiedad mdilist=true y tengo 3 formas abiertas y todas
se listan en el menu de edicion

Cuando hago click en una de las formas de la lista(menu edicion) no me llame
a la que deberia sino que me llame el evento de hacer click en "nuevo" del
menu archivo...

o khay alguna otra forma de hacer lo ke necesito ...

Muchas gracias por su tiempo y ojala hayan entendido mi duda..