弱弱的问一下：怎样枚举菜单项啊？

Question

弱弱的问一下：怎样枚举菜单项啊？

Answer 1

For Each Control In Me.Controls
    Debug.Print Control.Name
Next以上代码可以枚举当前窗体里的所有控件的名称也包括菜单，在对控件进行命名的时候采用统一的命名规则，取出全部的控件以后做个简单的名称过滤就可以取到全部的菜单了

Answer 2

楼上答对了一半。
使用TypeOf判断Control的类型即可获取所有菜单项。
For Each Control In Me.Controls
    If TypeOf Control Is Menu Then
        Debug.Print Control.Name
    End If
Next另外，菜单可以是控件数组，把菜单建立成控件数组会更方便。