[求助]我遇到一个问题,谁能帮帮我?

zt032516

acadapp_beginopen是不是可以在打开一个AutoCAD文件时触发beginopen?可是我为什么打开一个autocad文件不触发?

mccad

因为需要初始化。
Public WithEvents ACADApp As AcadApplication
Sub AcadApplication_Events()
Set ACADApp = GetObject(, "AutoCAD.Application.16")
End Sub