明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1848|回复: 3

vb2008 与autocad2004 连接问题

[复制链接]
发表于 2009-3-28 13:10 | 显示全部楼层 |阅读模式

我用的是VB2008,连接AutoCAD2004
代码如下:
Imports AutoCAD
Public Class Form1
    Public acadApp As AcadApplication 'AutoCAD 的application对象
    Public acadDoc As AcadDocument 'AutoCAD document对象
    Public moSpace As AcadModelSpace 'Modelspace 模型空间对象集合
    Public paSpace As AcadPaperSpace 'PaperSace 图纸空间对象集合


    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        End
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        '加载AotuCAD
        On Error Resume Next
        acadApp = GetObject(, "AutoCAD.Application.16")

        If Err.Number <> 0 Then
            Err.Clear()
            acadApp = CreateObject("autocad.application.16")
            If Err.Number <> 0 Then
                MsgBox(Err.Description)
            End If

        End If
        acadDoc = acadApp.ActiveDocument
        moSpace = acadDoc.ModelSpace
        acadApp.Visible = True

    End Sub
End Class


然后消息框中出现如下警告:
在 System.Exception 中第一次偶然出现的“Microsoft.VisualBasic.dll”类型的异常

请问这个警告是怎么回事,如何解决。 

郁闷好几天了,盼解决。

发表于 2009-3-29 16:07 | 显示全部楼层
把那些变量都声明成object试试
 楼主| 发表于 2009-3-29 19:07 | 显示全部楼层
你能说的详细的吗,谢谢。我快崩溃了,网上都搜不到类似问题。
 楼主| 发表于 2009-4-13 08:31 | 显示全部楼层

不行啊,有做过的,来帮帮我啊

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-5-18 21:50 , Processed in 0.217786 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表