CAD_vba开发手册(3)

你在VBA管理器中选择了另存为项

在VBA工程没有保存的情况下结束或退出AutoCAD进程

注意：当你保存工程时，它将分配一默认的文件名称project.dvb。尤其重要的是在你保存工程时你应该为工程文件分配一新的名称。如果你使用默认的文件名称project.dvb保存工程，你将不能再创建新的空工程了。每一次你创建新的工程，你将得到的是装入已经存为project.dvb文件名称的工程。 引用其它VBA工程

从其它工程中引用VBA工程可开发者容易分享代码。开发者可使用宏来创建公用的库，然后在需要时引用库中的内容。这样可将共享代码公开并让众多的开发利用该代码。

引用其它VBA工程的操作

1. 在VBA IDE的工程窗口中，选择你要增加引用的工程。 2. 从工具菜单中，选择引用项以打开引用对话框。 3. 从引用对话框中，按浏览按钮打开添加引用对话框。

4. 从添加引用对话框中，选择你要引用的工程文件，然后按打开按钮。 5. 从添加引用对话框中，选择确定按钮完成引用的添加。

当另外的工程被成功以引用，你将会注意到在VBA IDE的工程窗口中有一新的文件夹。该新的文件夹是引用的标题，它包含着引用工程的名称。

当你引用了一个工程，你可使用工程中公用的代码或部件。

当引用了其它工程的工程被装载到AutoCAD中，被引用的工程也自动地装载到AutoCAD中。该被引用工程在引用它的工程没有关闭之前是不能关闭的。

你不能进行循环引用。也就是说，你不能引用包含第一个工程的工程。如果你不小心创建了一个循环引用，你将会得到VBA的一个警告提示。

注意：你不能引用嵌入工程或从其它应用程序中的VBA工程。

设置VBA IDE选项

你可使用选项对话框更改VBA IDE的特征。可使用工具菜单并选择选项来打开选项对话框。

选项对话框包含四个选项卡：编辑器、编辑器格式、通用和可连接。 编辑器

编辑器选项卡指定代码窗口和工程窗口的设置。

代码设置包括 自动语法检测 要求变量声明 自动列出成员 自动显示快速信息 自动显示数据提示

自动缩进 Tab宽度 窗口设置包括 编辑时可拖放文本 缺省为查看所有模块 过程分隔符显示

编辑器格式

编辑器格式选项卡指定Visual Basic代码的外观。 你可以

更改代码的颜色 更改文本列出项 更改前景 更改背景 更改边界标识条 更改文本字体和大小 显示或隐藏边界标识条 显示或隐藏你设置的示例文本

通用

通用选项卡指定当前Visual Basic工程的设置、出错处理和编译设置。 你可以

更改窗体栅格的栅格设置 显示或隐藏工具提示

设定工程折叠收起时自动隐藏窗口 在丢失当前状态前通知 决定出错时的处理方法

设定工程编译时为需要时编译或进行后台编译。 可连接的

可连接的选项卡允许你选择要进行泊留在主窗口上的窗口(也就是非浮动状态)。

进行介绍性练习

现在你可能已经学习了在AutoCAD VBA中进行编程的基础知识，那就试试创建一个简单的“Hello World”的练习示例。在本练习中你将创建一个新的AutoCAD图形，在图形中增加一行文本，然后保存图形，所有的这些操作都在VBA中完成。

创建“Hello World”文本对象

1 打开从AutoCAD的命令行中输入以下命令打开VBA IDE： 命令：VBAIDE

2 在VBA IDE的视图菜单中选择代码项打开代码窗口。

3 通过从VBA IDE的插入菜单中选择过程项在工程中创建一个新的过程。

4 当提示需要过程信息时，输入如Hello World这样的名称。确定类型选定的是Sub，而范围选定的是Public。

5 选择确定。

6 在行Public Sub Hello World()和行End Sub之间输入以下代码(功能是打开新的图形)： ThisDrawing.Application.Documents.Add

7 紧接着第6步输入以下代码(它创建文本字符并定义它的插入位置)。

Dim insPoint(0 To 2) As Double '定义插入点 Dim textHeight As Double '定义文本高度 Dim textStr As String '定义文本字符 Dim textObj As AcadText '定义文本对象

insPoint(0) = 2 '设定插入点X坐标 insPoint(1) = 4 '设定插入点Y坐标 insPoint(2) = 0 '设定插入点Z坐标

textHeight = 1 '设定文本高度为1.0 textStr = \设定文本字符

'创建文本对象

Set textObj = ThisDrawing.ModelSpace.AddText _ (textStr, insPoint, textHeight)

8 紧接着第7步输入以下代码(保存图形) ThisDrawing.SaveAs(\

9 通过从VBA IDE的运行菜单中选择运行过程/用户窗体项运行你的程序。

当程序运行完成后，回到AutoCAD应用程序中，你可看到在图形中出现有“Hello World!”的文本。该图形名称为Hello.dwg。

第五节：更多的信息

关于VBA IDE及Visual Basic编程语言的更多信息可在微软提供的帮助文件中找到。 访问微软VBA IDE帮助文件的操作

从VBA IDE的帮助菜单中，选择Microsoft Visual Basic帮助。

第六节：回顾AutoCAD VBA 工程术语

常规工程

保存在.dvb文件的VBA工程。 嵌入工程

保存在AutoCAD图形中的VBA工程。 正常文档

没有包含VBA嵌入工程的AutoCAD图形。 活跃文档

包含VBA嵌入工程的AutoCAD图形。 当前工程

在VBA IDE中当前选定的工程。 ThisDrawing

ThisDrawing是用于声称当前图形的VBA编程项目。在常规工程中，ThisDrawing通常指向AutoCAD的活动文档。在嵌入的工程中，ThisDrawing通过指向包含该工程的文档。 VBA IDE

指的是VBA交互开发环境。该应用程序允许你编辑工程中的代码和窗体，或从其它工程中复制代码和窗体。它也允许你设定引用其它应用程序的对象模块。 VBA 管理器

VBA管理器允许你管理工程。你可以创建、删除、嵌入或分离工程。你也可以查看工程是否嵌入于打开的图形中。 宏对话框

宏对话框允许你运行、删除和创建新的宏，也提供访问VBA工程选项。

第七节：回顾AutoCAD VBA 命令

VBAIDE

打开VBA IDE。

该VBA IDE允许你交互式地编辑、运行及调试程序。尽管VBA IDE只能在AutoCAD运行时才能调用，但它可独立于AutoCAD应用程序窗口进行最小化、打开和关闭。 VBALOAD

在当前AutoCAD进程中装载VBA工程。 VBARUN

从宏对话框中或从AutoCAD命令行中运行VBA宏。 VBAUNLOAD

从当前AutoCAD进程中卸载VBA工程。

如果VBA工程已被修改但还没有保存，系统会弹出保存工程对话框(或在命令行)提示是否保存。

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库CAD_vba开发手册(3)在线全文阅读。