[求助]：如何建立菜单与宏之间的连接

rose0415292

菜鸟求助：
用下面的语句我能在Autocad中添加新的菜单
Dim curMenugroup As AcadMenuGroup
Set curMenugroup=Thisdrawing.Application.MenuGroups.Item(0)

创建菜单项
Dim newMenu As AcadPopupMenu
Set newMenu=curMenugroup.Menus.Add("test")

确定选择项的宏
Dim  openMacro  As String
openMacro=Chr(3)+Chr(3)+Chr(95)+"open"+Chr(32)

添加选择项到菜单项中
Dim OpenMenuItem As AcadPopupMenuItem
Set openMenuItem=newMenu.AddMenuItem(newMenu.Count+1,"open",openMacro)

在Autocad菜单栏上显示新创建的菜单
newMenu.InsetInMenuBar(ThisDrawing.Application.MenuBar.Count+1)

但是有一个问题就是：
在确定选择项的宏的时候，上面的程序只能执行Autocad现有的命令（例如open,save,edit等等），那么有没有别的方法能确定选择项的宏，或者是如何建立模块与宏之间的连接

还有就是Chr(3)+Chr(3)+Chr(95)以及后面的Chr(32)
是什么作用啊？？

请多赐教！！

雪山飞狐(lzh)

把"Open"改成"(command ""-vbarun"" ""你的宏名"")"

yoursmile

哈哈，我知道，我学的时候也是看的你这本破书的，那个书的程序有的有问题，如2楼所说那样就行！那次搞了我好久！！