zoukankan      html  css  js  c++  java
  • 利用VB与AutoCAD链接进行CAD二次开发

    利用VB进行AutoCAD二次开发,首先应该将VB于CAD进行链接:在编写VB代码之前,在VB编程环境中引用CAD对象库,在编写VB程序代码时,创建CAD对象启动运行CAD程序。

    VB与CAD进行链接后,就可以利用AutoCAD对象及其下级对象的属性和方法,完成用VB语言在AutoCAD环境中的图形绘制和编辑操作,引用CAD对象库:在VB环境中选择“工程-引用”命令打开引用对话框,选中AutoCAD2004对象库,电脑上安装了什么版本的CAD这里就会出现对应的对象库。创建CAD对象的典型代码如下所示。

    Dim acadapp As AcadApplication
    Private Sub Form_Load()
        On Error Resume Next
        Set acadapp = GetObject(, "AutoCAD.Application")
        If Err Then
            Err.Clear
            Set acadapp = CreateObject("AutoCAD.Application")
            If Err Then
                MsgBox ("CAD启动错误")
                Exit Sub
            End If
        End If
        acadapp.Visible = True
    End Sub

    上面代码中的set语句将AutoCAD对象引用赋给变量acadapp,用来创建CAD对象的实例,如果AutoCAD已经启动,则getobject函数返回对该对象的引用,如果AutoCAD启动,则利用createobject函数启动新的CAD对象。如果AutoCAD未能创建,则消息框提示信息“CAD启动错误”。

    作者:codee
    文章千古事,得失寸心知。


  • 相关阅读:
    Win7最高权限问题
    UNEDI/FACT基础知识
    关于display
    sql server 复制需要有实际的服务器名称才能连接到服务器
    ANSI ASC X12标准学习指南
    Eclipse插件的安装方法
    PB DataWindow的38个技巧
    Java API 帮助文档中英文版下载
    用快捷方式在Windows2008下安装新字体的技巧
    sqlserver 性能分析报表
  • 原文地址:https://www.cnblogs.com/bimgoo/p/2503120.html
Copyright © 2011-2022 走看看