利用编程软件在AUTO CAD中绘制曲线的讨论与研究

钟宏程 孙晓

摘 要 本文介绍利用编程软件Visual Basic在AUTO CAD中绘制图形或曲线的两种方法，其中着重讲解使用Visual Bisic创建DXF格式文件，并在DXF格式文件中绘制曲线的方法。

关键词 编程软件 AUTO CAD 曲线

中图分类号：TP31 文献标识码：A

The Discussion and Research of Programming

Software in AUTO CAD Drawing a Curve

ZHONG Hongcheng, SUN Xiao

(Shenzhen Metro Group Co., Ltd., Shenzhen, Guangdong 518000)

Abstract This article describes the use of Visual Basic programming in AUTO CAD software to draw graphics or curves in the two methods, which focused on the use of Visual Bisic create DXF format files, and files in DXF format drawing curve.

Key words programming software; AUTO CAD; curve

随着计算机在工作中得到广泛使用，Auto CAD绘图已经逐步代替了手工绘图。为了更加快捷方便的绘图，越来越多的人利用编程软件对Auto CAD进行二次开发，进一步提高了工作效率。本文针对Visual Basic 在Auto CAD中的开发和使用进行讨论。

1 利用AUTO CAD软件中的宏（VBA）绘制图形

Visual Basic for Applications（VBA）是一种Visual Basic的一种宏语言，主要能用来扩展Windows的应用程式功能。假如需要在Auto CAD中画一组同心圆，我们只需要点击菜单栏中的“工具宏VBA”中“创建工程”，工程名为C100并在程序代码输入界面写入以下代码即可：

Sub c100()

Dim cc(0 to 2) As Double声明坐标变量

cc(0)=1000

cc(1)=1000

cc(2)=0定义圆心坐标

For i=1 to 1000 Step 10开始循环

Call ThisDrawing.ModleSpace.AddCicle(cc,i*10)画圆

Next i

End Sub

然后保存并装载工程，就会在画出100个圆心在坐标（1000,1000）处的同心圆。

VBA在Auto CAD的使用，大幅度提高了工作效率，减少了工作量。我们需要做的就是熟悉VBA在Auto CAD中的各种命令，并绘制出想要的图形。

2 使用Visual Basic创建DXF格式文件，并在DXF格式文件中绘制曲线

2.1 Visual Basic创建DXF格式文件

利用Visual Basic创建一个工程文件取名“曲线绘制.vbp”，并绘制按钮，具体如图1。

然后进入代码界面，对按钮进行代码写入，如下：

Private Sub Command1_Click()

Open "1.dxf" For Append As #1

Loop

即可。

2.2 使用Visual Basic在DXF格式文件中绘制曲线

DXF 是Autodesk公司开发的用于AutoCAD与其它软件之间进行CAD数据交换的CAD数据文件格式。DXF是一种开放的矢量数据格式，可以分为两类：ASCII格式和二进制格式；ASCII具有可读性好，但占有空间较大；二进制格式占有空间小、读取速度快。……