如何制作4级子菜单？？

elite

例如

菜单——子菜单——子子菜单——子子子菜单——子子子子菜单

这样的4级菜单怎么用vba程序实现？

onlypony

我也想知道,书上都是做到二级,自己尝试了一下三级菜单,结果总是出错,过往的大侠有谁知道呀,帮楼主顶一下了~

Lesnacklie

怎么办到底怎么办呢，伤脑筋

dongfang_t

不懂

yusicad

CAD中有个自己订制的菜单,ACAD.MENU

你用记事本打开,然后编辑 子菜单开始用<-.结束用->

烟雨.江南

建立多级子菜单应该没什么问题。试试下面这个过程吧。

Sub testMenu()
Dim menug As AcadMenuGroup, pmenu As AcadPopupMenu, pmi As AcadPopupMenuItem
    Set menug = ThisDrawing.Application.MenuGroups(0)
    Set pmenu = menug.Menus.Add("Test0")
    Set pmi = pmenu.AddSubMenu(0, "Test1").AddSubMenu(0, "Test2").AddSubMenu(0, "Test3").AddMenuItem(0, "Test4", "(princ ""Hello!"") ")
    Call pmenu.InsertInMenuBar(0)
End Sub

dongfang_t

要是用菜单宏制做子菜单应当怎么弄?

ID_MNMacro     [Test1]^C^C-vbarun;f:/VBAmenu/Test1.dvb!mdlMain.AutoTitleBar;这个命令只能实现菜单,如何实现这个菜单下的子菜单我就不会了.

用菜单宏感觉能简单些

woxing1987

不会弄，想学学