[求助]：在WORD中调用autoCAD,打开一张autoCAD的图

cadem

我要在WORD中调用autoCAD,打开一张autoCAD的图。
我自己试了一种方法：在WORD中的“引用”中添加对autocad的引用（AUTOCAD 2000 TYPE LIBRORY），
并编写如下程序如下：
Public Sub cad()
Dim app As AutoCAD.AcadApplication
Set app = New AutoCAD.AcadApplication
app.Visible = True
app.Documents.Open "d:\TEST.DWG"
End Sub

结果，autoCAD程序运行，但窗口不可见，在进程管理中可以找到该进程（名为acad.exe）。（系统为2000专业版）。

用“窗口隐藏”软件可以使autoCAD窗口显现。test.dwg文件显示正常。关闭“窗口隐藏”软件，autoCAD窗口也消失。但进程仍然在。

我现在实在束手无策了。请各位帮忙。其他方法或把我这方法改进使窗口显现都可以。

cadem

我自己又改了一下，成功了。
并编写如下程序如下：
Public Sub cad()
Dim app As AutoCAD.AcadApplication
Set app = New AutoCAD.AcadApplication
app.Application.Visible = True
app.Documents.Open "d:\TEST.DWG"
End Sub