关闭AutoCAD的提示窗口

xwjbs

这是我写的二次开发的程序的一部分.功能:移动当前活动窗口的所有的对象 .

Dim strCmd As String

strCmd = "_move" & vbCr & "all" & vbCr & vbCr & "0,0" & vbCr & vbCr

'Debug.Print strCmd

acadApp.ActiveDocument.SendCommand strCmd



命令完成以后,AutoCAD弹出窗口:
边界定义错误:没有找到有效地填充边界.



问题在于:我得程序是一个批量处理文件的程序.也就是,打开一个文件,处理完了以后再关闭.出现这个对话框以后,我得程序就中断了,运行不下去了.
acadApp.ActiveDocument.SendCommand strCmd 这样的命令传递不过去了. 怎样才能关掉这个窗口

王咣生

这是错误,只想解决这个问题才行,只想关闭窗口有什么用呢?

xwjbs

你说的对.可是,我只不过是移动当前文件中所有的东西,它却告诉我找不到图形边界.这种错误原因是什么?如何解决?唉,能让AutoCAD忽略这样的错误也行啊!

pandoram

xwjbs发表于2005-3-15 8:58:00你说的对.可是,我只不过是移动当前文件中所有的东西,它却告诉我找不到图形边界.这种错误原因是什么?如何解决?唉,能让AutoCAD忽略这样的错误也行啊!

边界似乎和移动命令无关哪..顶多没有选择到东西了.. 这个错误是在哪一句指令出现的呢? 虽然偶不太会VB了..