Esta rutina permite al desarollador buscar un item del menu. Se coloca en un string el nombre del item del menu que desea buscar
- Cree una nueva funcion (Window function, object function o simplemente una function)
- Defina una variable de return de tipo integer
- Defina los argumentos:

1. Tipo Menu para am_menu (by value)
2. Tipo String para as_opcao (by value)
3. Tipo Menu para am_retmenu (by reference)

Necesitas ahora copiar y pegar este bloque:

Long i, ll_ret
if upperbound(am_menu.item) > 0 then
 for i = 1 to upperbound(am_menu.item)
   if ll_ret 1 then
      if am_menu.item[i].classname() = as_opcao then
         am_retmenu = am_menu.item[i]
          ll_ret = 1
      else
          ll_ret = of_findmenu(am_menu.item[i], as_opcao, am_retmenu)
      end if
   end if 
  next
 else
   ll_ret = -1
 end if
 return ll_ret
 

 Esta rutina le contesta con 1 si encontrado el item y -1 si no encontrado.
 Ejemplo: (si le dio el nombre de of_findmenu) 
 Long ll_ret
 Menu lm_itemmenu
 
 ll_ret = of_findmenu(Parent.menuid, \'m_exit\', lm_itemmenu)
 
 if ll_ret = 1 then
   lm_itemmenu.visible = false
 else
   Messagebox(\'Aviso!\',\'No existe este item!\')
 end if