求助：VBA调用LISP程序时说“无法重复进入 LISP”

lichh_2003

我在VBA程序中调用自遍的LISP程序（已经编译好）。

在用VBA模拟选择实体时就说“

无法重复进入 LISP。

*无效选择*
需要点或 Last ”怎么解决这个问题啊？谢谢

     detE = axEnt2lspEnt(pl)
     Str = "copypl" & vbCr & detE
     ThisDrawing.SendCommand Str
     Str = BasePoint(0) & "," & BasePoint(1) & "," & BasePoint(2) & vbCr

mccad

VBA帮助中明确注明，如果能够直接用ActiveX方法完成的动作，不要使用SendCommand来做。因为这种方法太不稳定。