[求助]：请教各位如何在一个事件处理完毕后自动关闭图形？

evaporated

我在编写一个小程序。其中在处理一个事件时，需要在处理完后关闭图形。

请问该如何实现呢？按我的理解，一个事件的处理过程没有终结时，是无法执行

thisdrawing.close动作的。事实上也是如此。总是显示“图形忙”

请教各位，如何让程序知道一个事件已经处理完毕，并且执行关闭动作呢？

雪山飞狐(lzh)

你在什么事件里做的？VBA的事件很弱的，没有必要把程序放在事件处理里做

evaporated

endcommand 事件。
没办法啊。功能上必须这样。请问版主有好的方法或者思路么？

大概的代码是这个样子：
这是大概的源码：
Private Sub AcadDocument_EndCommand(ByVal CommandName As String)
If CommandName = "-PLOT" Or CommandName = "PLOT" Then s2time = True
    Thisdrawing.close false
End if

雪山飞狐(lzh)

另外做一个宏，在宏里关闭文档

evaporated

这个宏如何做法？
能详细说下么？
普通的宏，里面关闭文档倒好做。但是谁来调用它啊。

evaporated

要么先讲解下？呵呵。