[求助]明總﹐我下載你的對齊與均布工具出問題了﹐請你幫幫忙。

andyding

明总﹐我下载你的对齐与均布工具出问题了﹐请你帮帮忙。
系统是:Microsoft Windows 2000 (5.00.2195) Service Pack4 AutoCAD系统为﹕MDT6中的ACAD2002 (R15.06.030) {盗版的} 我的LSP是这样写的﹕
(defun c:ale () (vl-vbaload (findfile "AlignEntity.dvb"))
(setvar "cmdecho" 0)
(command "-vbarun" "AlignEntity.dvb!alignentity")
(setvar "cmdecho" 1)
(command pause)
(command "_VBAUNLOAD" "AlignEntity.dvb")
(princ)) (defun c:ave ()(vl-vbaload (findfile "AlignEntity.dvb"))
(setvar "cmdecho" 0)
(command "-vbarun" "AlignEntity.dvb!averageentity")
(setvar "cmdecho" 1)
(command pause)
(command "_VBAUNLOAD" "AlignEntity.dvb")
(princ)) 执行ALE或AVE都会出现警告对话框(如图)﹕
确定->确定->出现如下提示﹕
Command: ale Execution error
ALE Unknown command "ALE". Press F1 for help. Command: _VBAUNLOAD
Unload VBA Project: AlignEntity.dvb (图片可能看不清﹐第一个框的内容为﹕System Error &H80004005(-2147467259).无法指出的错误。
第二个框的内容为﹕Out of memory)