基于AutoCAD用VB二次开发零件测绘CAD系统
VBA的二次开发在工程测绘中的应用
ＶＢＡ的二次开发在工程测绘中的应用［摘要］本文主要阐述了利用WORD VBA(Visual Basic for Applications)开发应用于工程测绘软件的思路和方法。
［关键字］VBA AUTOCAD 动态链接库一、前言在工程测绘内业处理过程中常需对WORD表格数据、AUTOCAD图形数据进行交换处理，原手工编辑方法不仅工作效率低，且易出现人为错误。
结合日常工作需要，笔者对WORD、AUTOCAD自身编程语言VBA的功能进行了二次开发，利用VBA编写的宏自动地实现了WORD表格数据与CAD图形数据的转换，既提高了工作效率，减轻了技术人员的劳动强度，又提升了工程测绘的数字化作业水平。
二、利用word的VBA进行二次开发用WORD VBA编写宏自动实现控制点坐标（表格数据）在CAD中展点、转换成.coo（.cor）文件等功能。
然后再利用WORD的新建工具栏，将相关功能加入到工具栏中。
（一）基本功能1、在CAD中展点将表格数据直接转换成CAD图形数据2、将word表格数据转换成测量常用文件（*.COO、*.COR）（二）实现步骤1、引用ACAD2000动态链接库（acad.tlb）。
2、在程序中定义对象Dim acadObj As AcadApplication …定义对象Dim jzpoint As AcadPoint …定义点对象Dim mylayer As AcadLayer …定义图层对象3、利用GetObject（）或CreateObject（）命令直接调用CAD4、在cad中增加图层（Layers.Add）5、读入表格中数据6、展点---三维点坐标转换成.cor文件演示程序如下：Sub 三维点转cor()‟Dim i As IntegerDim xyz(2) As Double …用于存放点的X、Y、Z坐标Dim mystr As String …用于图层名Dim fso As FileSystemObjectDim fl As TextStreami = 0z = 0mystr = InputBox(“请输入文件名”, “提示”)mystr = “c:\” & mystr + “.cor”Set f so = CreateObject(“Scripting.FileSystemObject”)Set fl = fso.OpenTextFile(mystr, ForAppending, True)For Each c In Selection.CellsIf i = 0 Thentextstr = Trim(c.Range)‟读入点号textstr = Left(textstr, Len(textstr) - 2)ElseIf i = 1 Thenxyz(1) = Val(c.Range) …读入X坐标ElseIf i = 2 Thenxyz(0) = Val(c.Range)‟读入Y坐标ElseIf i = 3 Thenxyz(2) = Val(c.Range)‟读入Z坐标…z = z + 1fl.WriteLine z & “,” & textstr & “,” & “ “ & “,” & xyz(1) & “,” & xyz(0) & “,” & xyz(2)i = -1End Ifi = i + 1Next cSet fl = NothingSet fso = NothingEnd Sub三、利用AUTOCAD的VBA进行二次开发用AUTOCAD VBA编写宏命令实现图形数据文件自动生成WORD表格文档。
基于VB_NET的AutoCAD二次开发
由于 VB与 AutoCAD运行在不同的内存空间 ,所以进 行二次开发时首先必须将其与 AutoCAD 进行链接 ,即引 用 AutoCAD 的对象 、属性和方法的库文件 : Acad. tld,该库 文件位于 AutoCAD程序的目录下 ,它并不保存对象本身 , 只保存创建对象的相关信息 。AutoCAD 应用程序对外暴 露的对象按树状层次结构顺次展开 ,依次为 App lication对 象 、Document对象 、Model Space对象和 Paper Space对象等 深层次对象 ,其顶层为 AutoCAD App lication,是引用其他 对象的基础 。链接的具体方法是 :运行 V isual Basic. NET, 创建一个 V isual Basic. NET项目 。打开项目菜单 ,选择添 加引用 ,再选择 COM ,复选 AutoCAD2002 Type L ibrary,再 编写 VB 程序代码 , 创建 AutoCAD 对象 , 启动运行 Auto2 CAD[ 7 ] 。
AddL ightW eightPolyline (points) 然后做 1到 10点所围成的剖面
轮廓的镜象 , 镜象轴为 Y, 得到齿轮 上半部分轮廓的左边部分 。如图 2 所示 。
3) 将齿轮上半部分轮廓的左、 右部分 创建 面 域 , 并 进 行 布 尔和 运 算 。其规则是 :对象 A 与对象 B 进行 布尔运算结果返回给对象 A ,然后将 上半部分轮廓绕齿轮轴线旋转 ,旋转 angle为 360°,得到齿轮结构旋转体 , 其方法为 :
利用VBA对AutoCAD二次开发在矿山测量中的应用
利用VBA对AutoCAD二次开发在矿山测量中的应用摘要：本文通过对AutoCAD绘图软件、二次开发语言VBA的介绍，以及分析矿山测量在制图时对AutoCAD的需求，阐述利用VBA对AutoCAD二次开发在矿山测量中的应用。
关键词：AutoCAD；VBA；二次开发；矿山测量1关于AutoCAD、VBA1.1介绍AutoCAD、VBAAutoCAD（Auto Computer Aided Design）是美国Autodesk公司首次于1982年研究开发的计算机辅助设计软件，是目前国际上应用最流行的绘图工具，功能全面，操作稳定，普适性强，广泛用于二维绘图、详细绘制，深受各行各业设计者和工程技术人员的喜爱。
与此同时，高普适性也对应着AutoCAD另一大特点：开放的结构体系。
这种开放体系，使得不同行业、专业根据自身的特点能够对其进行Autodesk二次开发，可以说AutoCAD的普适性为其二次开发提供了必要条件，从而也弥补了其专业针对性能不强的弱点。
从AutoCAD R14.01版开始，Autodesk在AutoCAD中加入了VBA（Visual Basic for Applications），作为AutoCAD的一种二次开发工具。
VBA是一种完全面向对象体系结构的编程语言，是Visual Basic的一种宏语言，与VB有着相似的语言结构和开发环境。
在VBA中，AutoCAD通过AetiveX提供了一个沟通外部世界的机制，使得AutoCAD通过不同的编程语言和环境进行二次开发。
可见，VBA是通过ActiveX接口建立与AutoCAD对象之间的联系，在AutoCAD和Visual Basic之间搭建起起了一座桥梁，将其完美的融合在一起，创造出符合用户要求的程序，形成新的功能性强、灵活性高的软件。
1.2利用VBA对AutoCAD进行二次开发的优点VBA与其他AutoCAD二次开发技术相比，优点有很多：VB语言基础广泛。
关于VB对AutoCAD二次开发学习笔记
关于VB对AutoCAD二次开发学习笔记□By OYLS基于VB对AutoCAD的二次开发，主要是通过运用VB编程对AutoCAD软件中的基本绘图操作进行控制，了解AutoCAD软件中的常用命令。
在编程过程中我们要借助AutoCAD软件中的“帮助文件”，即“AutoCAD开发人员帮助”文档。
一、获取VB对AutoCAD的控制权：先定义变量acadApp,acadDoc:Public acadApp As AcadApplicationPublic acadDoc As AcadDocumentFunction boot_CAD() As BooleanOn Error Resume NextSet acadApp = GetObject(, "AutoCAD.Application")If Err ThenErr.ClearSet acadApp = CreateObject("AutoCAD.Application")If Err ThenMsgBox "您没有安装AutoCAD ，或安装版本错误！", vbOKOnly + vbInformation, "CAD简易绘图系统"boot_CAD = FalseBtOK = FalseExit FunctionEnd IfEnd IfSet acadDoc = acadApp.ActiveDocumentacadApp.Visible = Trueboot_CAD = TrueEnd Function需要说明的是，我们只有先对CAD获取了控制权以后才能有效地运用VB编程方式进行CAD的基本绘图操作。
不然，以后的各种对CAD的操作将无法得以实现。
二、基本绘图思路：先了解所绘对象的基本属性，可以说，也正是由于对象的各种属性才构成了一个特性为一而标准的实体。
对象的属性特点我们可以事先通过CAD帮助文件查找得出。
AutoCAD二次开发技术在工程测绘制图中的应用
AutoCAD二次开发技术在工程测绘制图中的应用摘要:简要介绍了进行AutoCAD二次开发的常用方法和技术特点,并以实例说明了利用VBA实现AutoCAD二次开发的实际价值和意义。
关键词: AutoCAD二次开发VBA 工程测绘制图坐标标注随着现代科学技术的迅猛发展，测绘科学也发生了翻天覆地的变化，测绘仪器和测绘技术都有了很大的发展，测绘仪器由原来的光学仪器、机械仪器发展到了电子仪器，图形绘制由铅笔平板仪绘制发展到计算机软件绘制。
电子仪器可通过专用传输线与计算机直接连接，把野外所采集的数据传输进计算机，在计算机中进行数字化成图。
以手工作业为主的测量内业计算与绘图工作已经可以通过电子仪器、计算机绘图仪完成。
数字化成图已经成为测图发展的主流方向。
目前市场上的数字成图软件有很多，测绘行业普遍使用的有南方测绘公司的CASS 系列、广州开思公司的SCS 系列，还有北京微远图公司的SV300 系列等软件,这些软件多是以AutoCAD为平台开发的, 它们主要针对的是测绘行业的通用性需求,在大体框架上基本满足了地形图、地籍图等测绘工作的成图要求。
但测绘性质的多样性，决定了不可能有适合所有测绘性质的数字成图软件，在实际工作中,一些制图工作在许多细节上的操作具有特殊性，并且随测绘性质和目的的不同而有所不同。
而且每个测绘员又各有各的工作方式和习惯.这些通用软件对一些特殊性质的处理控制和专业性强的特殊要求就不能满足了，怎样解决这个问题和要求,使数字化成图软件更符合自己工作要求呢?下面针对本单位经常进行的工程测量成图工作中遇到的问题,介绍解决基本方法与过程。
一.AutoCAD及二次开发简介1. AutoCADAutoCAD是美国Autodesk 公司开发的一个交互式绘图软件，具有开放的极其灵活的体系结构，它允许用户和开发者采用各种方法对其进行定制、扩充和修改，即用户自己可以对进行二次开发,能最大限度地满足用户的特殊要求。
基于CAD利用VB.NET二次开发自动化绘图应用研究
基于CAD利用二次开发自动化绘图应用研究从CAD支持点NET以来，给开发人员带来了很大的便利。
在建筑绘图领域，利用点NET在CAD下面进行二次开发成为主流，开发自动化绘图应用提高了建筑领域数据处理和绘图工作的效率，减轻了工作的劳动强度。
本文主要介绍利用开发自动化绘图的步骤及要点。
标签：CAD二次开发；；自动化绘图；地形图1 前言随着在开发领域的利用越来越广，CAD的最新版本已经支持点NET进行二次开发。
CAD以前只有LISP、VBA等进行二次开发，这几种开发方式都有自己的优点和缺点。
CAD支持点NET后，可以充分发挥点NET的综合开发的功能，让开发人员更便捷快速的利用CAD的各项功能。
下面主要介绍利用在CAD下面进行开发，并以实例：开发自动化绘图应用简单介绍开发步骤和要点。
2 CAD二次开发的需求在建设绘图领域工作中，时常需要利用CAD制图工具进行绘图及数据内业处理。
但是由于建筑测绘专业工作的特殊性，有时候处理的数据比较繁多，利用CAD直接一个个的人工进行数据处理绘制图形，需要花费的时间和人力是比较多的。
这样就需要有一个可以处理大批量数据的程序应用，利用CAD自动的绘制数据所代表的图形元素（包括点、线、圆、符号、文字等），需要处理的数据有时几百、几千，甚至上万个数据，给我们在野外完成测绘调查后处理数据绘制图形工作带来很大的压力。
这个就需要我们有一个在CAD下面可以处理和绘制大批量数据的应用提供使用，满足内业处理数据和图形绘制工作，提高工作的效率和降低劳动的强度。
在CAD支持点NET进行开发后，我们可以方便的利用它来进行这方面的工作。
我们利用在CAD下面实现绘制测绘地形图的部分元素方法来认识利用在CAD下面进行的二次开发方法。
3 开发工具准备利用点NET在CAD下进行二次开发主要利用工具包括：开发工具（本文利用VS2008）、AutoCAD（支持点NET版本）本文利用CAD2008版。
4 开发流程4.1 准备数据4.1.1 点数据样式：一个点数据包括X，Y，H，点号四个数值。
基于VBA的AUTOCAD二次开发及应用实例
基于VBA的AutoCAD二次开发及应用实例时间：2011-10-0318:25:09来源：作者：1引言AutOCAD2005是AutOdesk公司的系列产品，该软件从其使用和设计思路上都秉承了工程制图人员的绘图习惯，能够非常轻松地绘制出带有平面视图和三维渲染效果的工程图纸，是绘图人员的一个理想工具。
随着CAD基础理论和应用技术的不断发展，对CAD系统的功能要求也越来越高。
因而AutoCAD 不可能完全满足每个用户的具体而特定的要求。
设计人员希望它能从本质上减轻大量简单烦琐的工作量，使他们能集中精力于那些富有创造性的高层次思维活动中。
AutoCAD提供的开放式体系结构允许用户和开发者采用高级编程语言对其进行扩充和修改，即二次开发，能最大限度地满足用户的特殊要求，更方便、更规范、更专业的实现设计和绘图中的应用。
VBA最早是建立在0ffice97中的标准宏语言，由于它在开发方面的易用性及具有的强大功能，许多软件开发商都将其嵌入自己的应用程序中，作为一种开发工具提供给用户使用。
AutOdeSk公司自从Aut0CADRl4．0l版开始，内置了VBA开发工具。
新一代程序开发工具ViSual BaSic，不仅继承了面向对象方法的特性，同时具备可视化程序语言及程序产生器的概念。
VBA(visual Basic For Apphcation)是AutoCAD R12以后推出的一种新的编程环境，提供了以Visual Basic为基础的面向对象的开发特征及程序接口，能真正快速地访问AutOCAD图形数据库，能明显提高软件开发和维护的效率。
2VBA的技术特性2．1VBA开发AUTOCAD的技术特点VBA是微软开发出来的应用程序共享一种通用的自动化语言，它可以使常用的程序自动化，并可以创建自定义的解决方案。
VBA被集成到AutoCAD中，VBA和AutoCAD中强大的Activex自动化对象模型的结合，代表了一种新型的定制AutoCAD的模式构架。
基于AutoLisp的AutoCAD二次开发在测绘图形处理中的应用
基于AutoLisp的AutoCAD二次开发在测绘图形处理中的应用摘要：本文介绍了如何利用Autolisp语言对AutoCAD进行二次开发，并实现了根据断面图来半自动化生成高程点，其结果大大提高了根据断面图绘制平面图的质量和速度。
关键词：AutoCAD Autolisp 自动化程序断面1引言在实际的测绘生产工作中，我们经常会遇到利用已有的断面图来绘制平面图进而复原地形的情况，想要绘制平面图高程点元素是必不可少的，那么我们就必须根据已有的断面图来生成相应的高程点。
本文介绍了如何利用Autolisp语言在AutoCAD中实现根据设计断面图半自动化生成高程点，简化了原来利用AutoCAD测距量取距离，计算桩号、偏距、高程，再用Cass交互展点画出高程点的生成办法，在提高了准确率的同时也提高了工作效率。
2 Autolisp简介Autolisp是由Autodesk公司开发的一种LISP程序语言，LISP是List Processor（表处理程序）的缩写。
LISP语言具有语法简单，通俗易懂等特点，通过autolisp编程，可以节省工程师很多时间。
AutoLISP语言作为嵌入在AutoCAD内部的具有智能特点的编程语言，是开发应用AutoCAD不可缺少的工具[[1]]。
在工程测量领域中，AutoCAD得到了普遍应用，在日常工作中有许多人在研究使用AutoCAD，并画出了很多工程图纸。
然而，人们经常会感觉到作图效率还是不够高，这是因为AutoCAD是一个通用的绘图软件，并不具备专业特色。
AutoCAD开放的结构为不同的使用者留出了广阔的空间，提供了许多二次开发工具，AutoLISP是其中最强大的一个，Autolisp是AutoCAD自带的一门编程语言，无需安装，是为扩展和自定义AutoCAD功能而设计的编程语言，Autolisp易于使用，并且非常灵活，多年来一直是自定义AutoCAD的标准。
Autolisp嵌入AutoCAD内部，它不仅具有一般高级语言的基本结构和功能，而且还具有强大的图形处理和数据交换功能。
关于VB的AutoCAD二次开发及其在测绘中应用研究
High & New Technology︱16︱2017年8期关于VB 的AutoCAD 二次开发及其在测绘中应用研究林 武四川省第三测绘工程院，四川 成都 610000摘要：本文主要对VB（Visual Basic）和AutoCAD 作了简要介绍。
在此基础上，重点阐述了基于VB（Visual Basic）的AutoCAD 二次开发步骤，然后详细对基于VB（Visual Basic）的AutoCAD 二次开发技术在具体工程测绘中的程序设计、数据预处理、图形绘制等主要应用内容进行分析，以实现快速对工程纵断面进行科学绘制。
关键词：Visual Basic；AutoCAD；二次开发；测绘中图分类号：P237 文献标识码：B 文章编号：1006-8465（2017）08-0016-01AutoCAD 是Autodesk 公司的系列产品，该产品的设计思路和使用理念都与工程测绘技术人员的绘图习惯相符，其能够绘制出具有三维渲染效果和带有平面视图的工程测绘图纸[1]。
应用表明，AutoCAD 绘图软件是当前交互式、通用式的计算机辅助绘图与设计软件包，其已广泛运用于汽车、机械、飞机、服装和电子、集成电路、航空、建筑及轮船等多个技术领域。
本文主要对Visual Basic 编程语言下，AutoCAD 二次开发的具体原理和步骤进行阐述。
在此基础上，详细对基于VB（Visual Basic）的AutoCAD 技术在工程测绘中的具体应用展开论述。
1 VB 及AutoCAD 简介VB 又称“Visual Basic”，它是美国微软公司推出的一款应用程序开发工具。
目前，这款程序开发工具已在Windows 平台中被广泛应用，其不仅简单、便捷，而且使用性较强，其为广大工程测绘工作者快速测绘成图奠定了重要技术基础[2]。
AutoCAD 则称之为绘图程序软件包，该技术工具于上世纪80年代由国外的 Autodesk 科技公司开发。
关于VB对AutoCAD二次开发学习笔记
关于VB对AutoCAD二次开发学习笔记□By OYLS基于VB对AutoCAD的二次开发，主要是通过运用VB编程对AutoCAD软件中的基本绘图操作进行控制，了解AutoCAD软件中的常用命令。
在编程过程中我们要借助AutoCAD软件中的“帮助文件”，即“AutoCAD开发人员帮助”文档。
一、获取VB对AutoCAD的控制权：先定义变量acadApp,acadDoc:Public acadApp As AcadApplicationPublic acadDoc As AcadDocumentFunction boot_CAD() As BooleanOn Error Resume NextSet acadApp = GetObject(, "AutoCAD.Application")If Err ThenErr.ClearSet acadApp = CreateObject("AutoCAD.Application")If Err ThenMsgBox "您没有安装AutoCAD ，或安装版本错误！", vbOKOnly + vbInformation, "CAD简易绘图系统"boot_CAD = FalseBtOK = FalseExit FunctionEnd IfEnd IfSet acadDoc = acadApp.ActiveDocumentacadApp.Visible = Trueboot_CAD = TrueEnd Function需要说明的是，我们只有先对CAD获取了控制权以后才能有效地运用VB编程方式进行CAD的基本绘图操作。
不然，以后的各种对CAD的操作将无法得以实现。
二、基本绘图思路：先了解所绘对象的基本属性，可以说，也正是由于对象的各种属性才构成了一个特性为一而标准的实体。
对象的属性特点我们可以事先通过CAD帮助文件查找得出。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
【】 进 明 ， 红芹 ．Ａ ｔＣ Ｄ ２０ ２徐 施 ｕｏ Ａ ０ ０实 战与 精 通 【 ． 京 ： 华 大 学 Ｍ】 北 清
出版 社 ， ０ ０ ２０．
块 各 编写 成一 个程 序 。绘 图过程 也 已程 序化 。其程 序 编
制 是 在 Ｖ 环 境 下 通 过 调 用 Ａ ｔＣ Ｄ 的 命 令 完 成 的 。程 Ｂ ｕｏ Ａ
图 ４ 操作 界面 （ ３）
Ｆｉ ４ ｇ． Ｏ ｐｅ ｔｎｇ ｂｏｕ ｄａｒ ａ ｒ ｉ ｎ ｙ
ｓ ｒａ ｅｃ ａ ｔ （ ） ｕ ｆｃ ｈ ｒ １
ｓ ｆ ｃ ｈ ｒ （ ｕｒａ ｅｃ ａ ｔ ２）
ｓ ｒａ ｅｃ ａ ｔ （ ｕ ｆｃ ｈ ｒ ３）
如 图 ２所 示 。
序 中用 到 的 部 分参 数 如 测 量 的结 构 数 据 等是 原 始 数据 ， 需操 作者 输 入 。计 算过 程 以及 这些 参数 的 取值 范 围 由一 定 的程 序来 处理 。为 了实 现计 算 与绘 图一 体化 ，本 系 统
进入 第 三个 界面 ，如图 ４所 示 。 该 窗 口根据 输 出的结 果 ，选 择螺 纹类 型 ，须 输 入绘 图 比例 ，参 数 确 定后 点 击 “ 定 ” 确 ，即可 在 Ａｕｏ Ａ 软 ｔＣ Ｄ
件 界 面 中按 比例绘 制 图 形 。 当然 ，也 可 以点 击 “ 回 ” 返 按 纽进 行其 他结 构 的选 择 。
Ｔｈ ｃ ｎ Ｄｅ ｅｏｐ ｅ ｔｔ ｒ ｅ Ｓｅ ｏ ｄ ｖ ｌ ｍ ｎ ｈｅ Ｐａ ｔＳｕｒ ｙ ａ ａｗｉ ｖｅ ｎｄ Ｄｒ ｎｇ ＣＡＤ ｙｓｅ ｂｙ Ｖｉｕａ Ｓ ｔ ｍ ｓ ｌＢａｓｃ Ｂａ ｅ ｏ Ａｕｔ ｉ ｓ ｎ ｏＣＡＤ
Ｈ Ｎ Ｙ — ｉ ，Ｚ ｕｎ － ｏｇ Ａ ｕ Ｑ ｎ ＨＵ Ｇ ａ ｇ Ｒ ｎ
（ ｈ ｉ ｔ ｒ ｎｕ ｃＩｓｔｔ ｆ ｒＦ ｒｅ Ｔ ｅＦｒ ｏ ａ ｔ ｎｔ ｕｅｏ ｏ ｃ ，Ｘｉｙｎ ｎｎ ６ ０ ０ ｓ Ａｅ ｉ ｉ Ａｉ ｎ ａ ｇＨｅ ａ ４ ４ ０ ，Ｃｈｎ） ｉａ
Ａｂ ｔａ ｔ ｓ ｒ ｃ ：Ｄｉｅ ｔ ｄ ｂ ｏ ｌａ ｄ ｂａｅ ｎ ｔｅ ｔ ｏ ｆＶｉｕａ ｓｉ ｄ ｖ ｌｐｎｇ ｔ ｈｅ ｓ ｔ ａｅ ｏ ｏＣＡＤ ，ｔ ｅ ｐ ｒ ｕｒ ｅ ｎ ｒｗｉｇ ｒ ｃｅ ｙ ｍ ｄｅ ｎ ｓｄ ｏ ｈ ｏ ｌｏ ｓ ｌＢａ ｃ， ｅ ｅｏ ｉ ｏ ｔ ｏｆ ｒ ｆＡｕｔ ｗ ｈ ａｔｓ ｖ ｙ ａ ｄ ｄ ａ ｎ
出版 社 ，０ ０ ２０．
４ 计 算 绘 图一 体 化 编 程
所 有 的应 用程 序 都 是用 Ｖ Ｂ编写 而 成 。为 了通 过 点 击 界 面上命 令 控件 完成 设计 和绘 图过程 ，必 须 在代 码 编 辑 器 中 编写 该命 令 控件 的 “ ｏ ａ ｄ Ｃ ｉｋ（ ”事 件 的 Ｃ ｍｍ ｎ＿ ｌ ｃ ） 自动 生成 代码 。根 据各 功能 模块 的划分 ，计 算 、绘 图模
维普资讯
维普资讯
・
制 造 业信 息 化 ・
图 ２ 操作 界面 （ ） １
Ｆｉ ． Ｏｐｅ ａ ｉ ｕｎｄａ ｙ ｇ２ ｒ ｔｎｇ ｂｏ ｒ
图 ３ 操 作界 面 （ ２）
Ｆｉ ３ ｇ． Ｏ ｐ ｒ ｉ ｎ ｄａｒ ｅ ａｔｎｇ ｂｏｕ ｙ
ＣＡＤ ｙ ｔｍ ｉｈ ｓｗｉ ｌｆｉｎ ｌ ｎ ｅｆｃ ｆｕｓｒｉ ｄ ｖ ｌｐ ｄ ． ｉ ｓｓｓｅ ａ ｒａｉｅ ｔ ｎｔｇ ａｅｏ ｏ ｐ ｉ ｎｄ ｄ ａ ｎ ．ｔａｓ ａ ｓｓｅ ｗｈ ｃ ｉ ｄ ｒｅ ｄｙ ｉｔ ｒａ ｅｏ ｅ ｓ ｅ ｅｏ ｅ Ｔｈ ｙ ｔｍ ｃｎ ｅｌｚ ｈｅｉ ｅ ｒｔ ｆｃ ｍ ｕｔ ｎｇ ａ ｒｗ ｇ Ｉ ｌ Ｃ ｉ ｏ ｎ ｉ ｐ ｏ ｅｔ ｅｃ ｍ ｐ ｅ ｑ ａｉｙ ａ ｄ ｄｅ ｒａｅｔ ｅ ｗｏ ｋｎｇ ｈ ｕｍ ｅ ｄ ． ｍ ｒ ｖ ｈ ｏ ｕｔ ｕ ｌ ｔ ｎ ｃ ｅ ｈ ｒ ｉ ｏ ｓ ｒ ｇ ａ ｙ
经过 上 一步 确定 之后 ，进 入第 二 个 界面 ，选 取 零件 上 的标 准结 构 ，如 ：螺纹 、键 槽 、倒 角 、退 刀槽 等 。选 取 某一 个标 准结 构后 ，此时 可 以输入 测 量 的数 据 ，然后 按 确定 ，系 统就 会将 所 输入 的数 据 和 已有 的标 准数 据 进 行 比较 ．选 出最接 近 的值作 为该 结 构 的输 出值 。这 一 窗
口 如 图 ３所 示 。
利用 全程 变 量来 传 递计 算与 绘 图之 间 的数 据 ，从而 提 高 程序 的运 行 速度 。
５ 结束 语
本 系统 设计 思 路清 晰 、正 确 ．严格做 到了 功能 模 块 化 、计算 和 绘 图 的程序 化 。本 系统 中零 件 的测 绘过 程 具 有一 定 的智 能 化 。系统 提 供 了全新 的 友好 界 面 ，避 免 了
繁琐 的传统 手 工做 法 ，只要 用 户选 择 好零 件类 型 ，选 择
或者 输 入一 些 参数 ，计 算 机就 会很 快 画 出图形 ，为 实 际 工作 中 快速 生成 系列 图纸 提供 了可 能 。 参 考文 献 ：
【】 瑞 新 ， 远 征 ． ｉ ａ Ｂ ｓｃ程 序 设 计 教 程 【 ． 京 ： 械 工 业 １刘 汪 Ｖｉ ３张 Ｖｓｌ Ｂ ｓ ｕ ｃ与 Ａ ｔＣ Ｄ 二 次 开 发 【 ． 京 ： 华 大 学 ｕｏ Ａ Ｍ】 北 清
出版 社 ． ０ ２ ２０．
【】 乐 源 ， 学 纯 ． 械 制 图 【 ． 京 ： ４郦 赵 机 Ｍ】北 国防 工 业 出 版 社 ，９ ５ １９ ．