[求助]急！！！请教高手关于菜单问题

mycad

1、在acad.mnl中我已经定义如下名令

(defun c:Iblk()
  (command "vbarun" "c:/M2006/VBA/Mp2000.dvb!WJSZPC.Insert_WJSZ_Block")
    (princ)
)

2、原来在ACAD.MNS中我定义了如下屏幕菜单，可以实现绘图，但是鼠标右键无法实现重复上一个命令

[WJSZ(53210001,给水井盖)]^C^C_-vbarun c:/M2006/VBA/Mp2000.dvb!WJSZPC.Insert_WJSZ_Block;53210001;^P
[WJSZ(54100001,污水井盖)]^C^C_-vbarun c:/M2006/VBA/Mp2000.dvb!WJSZPC.Insert_WJSZ_Block;54100001;^P
[WJSZ(54200001,雨水井盖)]^C^C_-vbarun c:/M2006/VBA/Mp2000.dvb!WJSZPC.Insert_WJSZ_Block;54200001;^P

3、我想把2的格式写成如下，实现鼠标右键重复上一个命令，

[WJSZ(53210001,给水井盖)]^C^C^PwjszIblk;53210001;^P

[WJSZ(54100001,污水井盖)]^C^C^PwjszIblk;54100001;^P

我测试了，这样不行，急用，请高手赐教！！！

谢谢！！！！！！！！

飞诗(fsxm)

右键重复上一个貌似只对＂命令＂有效～！

可以自定义一个Lisp命令调用VBA再执行

就能实现右键重复上一个命令了

mycad

版主您好，我在“1、在acad.mnl中我已经定义如下”已经定义了；不行吗？

ZZXXQQ

菜单中执行的不是一个命令，无法用鼠标右键或空格键重复。
二楼的建议是将其另定义成一个单独运行的命令。