isMenuLoaded ??

Hi,
How can I write a function that tells if a Menu Item Is Already Loaded.

Example

Code:

---

IF MenuLoaded(mnuOptions(2)) = True Then
  Msgbox "Menu Already Loaded"
  Else
  Load mnuOptions(2)
End IF

---

IF not MenuLoaded(mnuOptions(2)) Is nothing then

What I need is the code for the "MenuLoaded" function

I wouldn't recommend implementing functions for everything, at least not if you can do it with an operator:

Function Menuloaded(obj as object) as boolean
Menuloaded=not obj is nothing
End function

If you want to load a menu to the next free one, just load it from the Controls Count property.

Code:

---

iCount = mnuMenu.Count
Load mnuMenu(iCount)

---