Is there a way to enumerate the menus on a form and determine their structure as it appears in the menu editor. I am writing a process that will aloow an administrator to restrict access to a particular menu. I know the following:

Dim oControl As Object

For Each oControl In Me

If Left(oControl.Name,3) = "mnu" Then
MsgBox oControl.Name
End If

Next oControl

Any ideas?