关于菜单的问题!
用VBA做菜单,可以实现如下功能吗?1),每次启动时记载自己用VBA写的菜单(为什么我将.DVB文件加到启动组后不能自动加载?)
2),菜单做好后,可以象VB里面写Click命令,然后进行相应的事件吗?(我现在在写加载菜单的程序里面 set menuItemObject=submenuobject1.addmenuitem(1,"click","-vbarun thisdrawing.______",vbcr), _____可以是自己写的宏吗?
谢谢高手指点! 1,VBA加载了不等于执行,可以在ACAD****DOC。LSP文件下加入如下代码:
(command "vbarun" VBA文件路径)
启动ACAD后就可以自动执行你的VBA文件了
2,当然可以,那不然菜单有什么用?菜单格式如下:
MacroStr = Chr(3) + Chr(3) + Chr(95) + "A" + Chr(32)
Set MenuItem = NewMenu.AddMenuItem(B, "C", MacroStr)
A-LISP定义的命令
B-位置
C-说明
这里就要加载相应的LISP文件了:
(DEFUN C: A()
(COMMAND "VBARUN" VBA文件路径)
) 当然可以,那不然菜单有什么用?菜单格式如下:
MacroStr = Chr(3) + Chr(3) + Chr(95) + "A" + Chr(32)
Set MenuItem = NewMenu.AddMenuItem(B, "C", MacroStr)
A-LISP定义的命令
B-位置
C-说明
这里就要加载相应的LISP文件了:
(DEFUN C: A()
(COMMAND "VBARUN" VBA文件路径)
)
Thank you, 可是怎么加载LISP文件呢?
(DEFUN C: A()
(COMMAND "VBARUN" VBA文件路径)
这一段应该写在哪里呀?ACAD*DOC.lsp?
不知道写在哪里。
) 2004版的好像加在ACAD*DOC.lsp不能自动加载?
页:
[1]