怎样检测某菜单（数组）是否存在

Question

怎样检测某菜单（数组）是否存在？如果不存在就创建它？如m1(3)是否存在，不存在时就load m1(3)创建
问题是，怎么知道m1(3)是否已经存在呢？

Answer 1

If ml(3) Is Nothing then
    Load ml(3)
EndIf

Answer 2

还有一种方法
可以先预先设置控件数组的个数
然后创建一个就判断是否达到规定个数达到就不创建
否则就load

Answer 3

Private Sub Command1_Click()
Dim mneux As Menu
For Each menux In ml
If menux.Index = 3 Then MsgBox "exist ml(3)": GoTo r:
Next
Load ml(3)
ml(3).Visible = True
r:
Exit Sub
End Sub