社区 › C# › [求助]AutoCAD不能启动??

zzatom 发表于 2009-5-12 18:54:00

[求助]AutoCAD不能启动??

本人用如下语句想在vb。net2008中启动，可是启动不了，总说找不到
请各位高手帮我看看语句有什么问题，是不是08版的跟02版的语法有变化？
Sub 连接AutoCAD()
      On Error Resume Next
      Acadapp = GetObject(, "AutoCAD.Application")
      If Err.Number Then
            Err.Clear()
            Acadapp = CreateObject("AutoCAD.Application")
            If Err.Number Then
                MsgBox("不能运行AutoCAD,请检查是否安装了AutoCAD")
                Exit Sub
            End If
      End If
      Acadapp.Visible = True '界面可视
      Acadapp.WindowState = AutoCAD.AcWindowState.acMax '界面最大化
      AppActivate(Acadapp.Caption) '显示AutoCAD界面
    End Sub

查看完整版本: [求助]AutoCAD不能启动??