hay alguna forma de yo recorrer todos los menus creados en un formulario, asl asi como:
for each Menu in Menus
...
next
Lo quiero para establecer la seguridad en mi aplicación. Tengo una tabla con los nombre de cada una de las opciones de los menu, por ejemplo:
La opcion Archivo del menu se llama mnuArchivo, la opción Abrir del menu se llama mnuAbrir.
Lo que quiero es poder hacer esto:
rst.Open "Select from Acceso where User = Fulanito and entrar = true"
do while not rst.eof
for each menu in menus
if rst!NombreMenu = menu.name then
menu.visible = false
end if
next
rst.movenext
loop
Alguien me ayuda a hacer esto?
