Solidworks 二次开发入门教程连载 4：运用 VB 语言实现二次开 发VB 简述 Visual Basic（简称为 VB）是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言， 可用于开发 Windows 环境下的各类应用程序。它简单易学、效率高，且功能强大可以与 Windows 专业 开发工具 SDK 相媲美。在 Visual Basic 环境
下，利用事件驱动的编程机制、新颖易用的可视化设计工具， 使用 Windows 内部的广泛应用程序接口（API）函数，动态链接库（DLL）、对象的链接与嵌入（OLE）、 开放式数据连接（ODBC）等技术，可以高效、快速地开发 Windows 环境下功能强大、图形界面丰富的应 用软件系统。随着版本的提高，Visual Basic 的功能也越来越强。5.0 版以后，Visual Basic 推出了中文 版，与前个版本相比，其功能有了很大提升。 Visual Basic 6.0 作为 Visual Studio 6.0 的优秀一员，已成为企业级快速开发的利器。Visual Basic 6.0 在数据访问方面有了很大的改进，新的 ADO 组件让对大量数据快速访问成为可能。数据环境和新的报表 功能也让数据开发有了全新的体验。Visual Basic 借助 COM/COM+强大的功能，可以开发具有多层结构 的分布式应用程序。同时，Visual Basic 还可以在 IIS 上开发性能超群的 Web 应用程序。Visual Basic 6. 0 在语言方面和 IDE 方面的改进都不大，但是许多新增的组件成为 Visual Basic 开发人员手中的利器，如 File System Object 等。新的字符串函数 Split 和 Replace 等也给 Visual Basic 的程序员带来很大方便。 Visual Basic 6.0 具有下述优点: (1) 面向对象 (2) 事件驱动 (3) 软件的集成式开发 (4) 结构化的程序设计语言 (5) 强大的数据库访问功能 (6) 支持对象的链接与嵌入技术 (7) 网络功能 (8) 多个应用程序向导 (9) 支持动态交换、动态链接技术 (l0) 联机帮助功能 VB 拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用 DAO、RDO、ADO 连 接数据库，或者轻松的创建 ActiveX 控件。它不像高级语言 Visual C++那麽复杂，但它的功能很全，程序 员可以轻松的使用 VB 提供的组件进行二次开发，快速建立属于自己的应用程序。 2 利用 VB 实现圆台交互式绘制的实现过程 2.1 启动 VB 程序启动 VB 程序，VB6.0 的主窗口如图 1 所示，可以直观地看到主窗体主要有以下部分组成：标题栏；菜单 栏；工具栏；窗体设计器；控件（工具）箱；弹出式（上下文）菜单 ；工程管理器窗口 ；属性窗口；对 象浏览器 ；对象浏览器及窗体布局窗口。 建立一个新的标准 EXE 工程文件，对其进行重命名保存，重命名为&圆台绘制&，将 Form 窗体文件重命名 保存为&交互式圆台绘制&，如图 2 所示。特别需要注意的一点是：在标题栏显示的当前的工程名及窗体名 是通过修改属性窗口中&名称&属性及&caption&属性得以实现的，与实际的工程名及窗体名并无直接联系， 实际的工程名及窗体名是通过诸如&（圆台绘制.vbp）&形式体现出来的。图 1 VB6.0 主窗口图 2 重命名操作后的工程资源管理器2.2 引用 Solidworks 类型库文件 要操作 SW 对象，那么添加 SW 引用是必不可少的。在 VB 里添加引用，单击菜单栏中【工程】【引用】 命令，选择&SolidWorks exposed Type Libraries For add-in Use&(SolidWorks 插件库文件)、&SolidWor ks 2007 Type Libray& （SolidWorks 库文件） 和&SolidWorks Consant Type library& （SolidWorks 常数库） ， 如图 3 所示。本文其实只用到了&SolidWorks 2007 Type Libray&（SolidWorks 库文件），但为了方便以 后的程序扩展，将上述三种常用库文件一并添加。图 3 引用 SolidWorks 类型库2.3 编辑窗体界面 （1）拖动工具箱组件板上的 Lable 控件、TextBox 控件及 CommandButton 控件到 Form 上。 （2）接下来在属性窗口将 Lable1、Lable2 的属性分别设置为&圆台半径：&、&圆台高度：&；将 Comm andButton1、 CommandButton2 的属性分别设置为&启动 SolidWorks 交互式绘图&、 &退出 SolidWorks 软件 &。编辑后的窗体界面如图 4 所示。图 4 编辑后窗体界面2.4 编程实现 在 VB 编程环境下，引用单元文件，创建相关函数及编写事件处理过程，实现程序功能。绘制圆台的详细 程序代码及其注释如下所示： Private Sub Command1_Click() Dim swapp As Object Dim part As Object Dim boolstatus As Boolean &定义接口 Set swapp = CreateObject(&SldWorks.Application&) Set part = swapp.NewPart() swapp.Visible = True &获取 solidworks 软件接口并新建一个零件文件 part.InsertSketch2 True boolstatus = part.Extension.SelectByID(&前视&, &PLANE&, 0, 0, 0, False, 0, Nothing) part.InsertSketch2 True part.CreateCircle 0, 0, 0, 0, Val(R.Text) / 10005, 0 part.ShowNamedView2 &*上下二等角轴测&, 8 part.FeatureManager.FeatureExtrusion True, False, False, 0, 0, Val(H.Text) / , False, False, False, False, 0, 0, False, False, False, False, 1, 1, 1 &建立模型 End Sub 点击&启动 SolidWorks 交互式绘图&后，程序调用 SolidWorks 自动绘制的圆台三维图如图 5 所示。可交 互式修改参数，直至达到满意的效果。操作完成后点击&退出 SolidWorks 环境&可以自动关闭并退出 Solid Works 环境。图 5 交互式绘图后结果3 小结 本文同样以一个简单实例的实现过程为例，采用 VB 语言编制了相关程序，详细介绍了二次开发的具体实 现过程，给出了重要文件的引用、属性设置、接口程序的编制和事件处理等过程的完整代码。通过上述实 例的实现过程，可以看出： VB 语言简单易学，学习过程中很容易上手；功能齐全，程序员可以轻松的使 用 VB 提供的组件进行二次开发，快速建立属于自己的应用程序，在其各项高效强大集成功能的支持下， 最终可方便快速地完成二次开发任务。 参照连载 1 中的通过宏录制实现的二次开发过程，可以清楚地看到，利用 VB 二次开发实现圆台绘制 的具体命令源代码不需要自己编写，可以直接对宏录制的相关源码拷贝过来加以利用即可，只需要修改其 中的相关变量参数诸如 Val(R.Text)即可，易于实现，减轻了程序员的工作量，提高了程序的开发速度。简单说明 SolidWorks API 的应用本文通过介绍“自定义属性”这个程序的开发和使用过程，来简单地说明 SolidWorks API 的应用，希 望起到抛砖引玉的作用。 SolidWorks API 是 SolidWorks 的 OLE 应用程序开发接口，用户可以利用它和支持 OLE 编程的开发工 具，如 VB、VBA(Excel,Access)、C、VC++等对 SolidWorks 进行二次开发，建立适合用户需要的、专用的 SolidWorks 功能模块。 一、问题的提出大多数工程图纸的标题栏中应该包括一些基本的设计信息，如零件名称、零件代号、 材料以及设计人员和设计日期等，其中，零件的名称、代号、材料、数量、重量及一些重要的后处理要求 等信息还应该出现在装配图的材料明细表(BOM)中。这些内容如果在工程图中一一进行编写和修改，其工 作量是很大的，并且这种处理方法也不利于保证设计信息的一致性，对模型文件(零件或装配体文件)和图 纸文件的管理来讲是脱节的。SolidWorks 是一个全相关的三维机械设计软件，模型文件中的设计数据，如 尺寸、注释、文件属性等内容与工程图相关，因此，我们在处理上述工程图标题栏和材料明细表中的设计 数据时，应该将这些内容保存在模型文件中，并且自动显示在工程图相应的位置上。当需要对工程图中的 内容进行修改时，直接修改模型文件中的相应数据即可实现。 这样的处理方法不仅保证了设计信息的一致性，而且可以大大提高设计效率。根据这个设想，笔者将 这些设计信息进行了归纳，并将它们作为模型文件的自定义属性保存在模型文件指定配置的属性(在 Solid Works 中，选择菜单“文件→属性”，单击“指定配置”标签，如图 1 所示)中，针对模型文件指定配置的这些 属性可以自动带入到工程图的标题栏和材料明细表。 对于材料明细表模板进行修改或建立新的明细表模板就可以在装配图中的材料明细表中显示所需要的 设计信息(工程图格式文件的定义和材料明细表模板的定义， 请参阅 《SolidWorks2001 中文版实用技术精粹》 一书)。因此，无论何时需要修改设计信息，只需在 SolidWorks 中打开相应的模型文件，修改指定配置属性 即可。然而，即使采用这样的处理方法，在修改文件当前配置属性时仍然显得有些繁琐，能否为 SolidWor ks 建立一个工作界面，可以更加方便地添加和修改这些信息就成了问题的关键。 二、自定义属性 Cpbom 为了更大程度地提高工作效率，我们利用 VB6.0 通过 SolidWorks API 建立了 自定义属性设置程序——Cpbom，这个程序通过一个对话界面直接对当前模型文件的当前配置进行添加或 修改，其基本功能如下： ☆ 针对配置添加模型文件的自定义属性; ☆ 设置的项目包括：零件代号、材料名称、后处理、设计者姓名、设计日期; ☆ 确定自定义属性后，自动保存文件;如当前文件还没有保存，提示文件保存路径和文件名称; ☆ 针对装配文件，可以选择是否删除“材料”和“后处理”两个属性。本程序利用 VB 进行编译生成可执 行文件。自定义属性界面 “自定义属性”程序就是通过 SolidWorks API 对当前模型文件中当前配置的自定义属性的名称和值进行“读”和“写”的操作，程序非常简单，这里介绍一下该程序中用到的一些 SolidWorks API 的对象和方法。 1.SolidWorks 对象这里指的是 SolidWorks API 的最高级别的对象。 通过该对象可以控制 SolidWorks 软 件的执行或退出，以及 SolidWorks 文件的建立、打开、关闭等操作。在 VB 中利用 CreateObject 方法来获 得 SolidWorks 对象，利用该对象的 activedoc 方法可以获得当前 SolidWorks 文件对象，文件对象为空时， 表示 SolidWorks 没有打开任何文件。 Dim swApp As ObjectDim activeDocument As ObjectSet swApp=CreateObject(&SldWorks.Application&) Set activeDocument = swApp.activedocIf (activeDocument Is Nothing) Then Dim Msg, Style, title St yle = vbExclamation title = &模型自定义属性& Msg = &请首先打开一个 Solidworks 模型文件& Call MsgBox(Msg, Style, title) ' Display error message End End If 2.获取当前文件信息自定义属性程序是对模型文件设置自定义属性，与工程图文件无关，因此需要利 用 GetType 方法获得当前文件的类型，并利用 Gettitle()方法和 Getpathname()方法获得当前文件的名称和存 盘路径。 Dim docType As LongDim docName As StringDim filename As StringDim FilePath as StringdocType = activeDocument. GetTypeIf (docType = swDocPART) Then docName = &零件&With CPbomfrm .deldescription.Enabled = False .delmaterial.Enabled = False End With Picture5.Picture = Picture3.Picture ElseIf (docType = swDocASSEMBLY) Then docName = &装配& Picture5.Picture = Picture2.Picture ElseIf (docType = swDocDRAWING) Then Style = vbExclamation Msg = &当前文件是工程图文件， 请打开零件或装配文件&Call MsgBox(Msg, Style, title) ' Display error message End End If filename = activeDocument.GETTITLE() FilePath = activeDocument.getpathname() 3.获取文件配置名称 SolidWorks API 提供了按照配置名称访问自定义属性的方法——CustomInfo2(读 取自定义属性的值)、deletecustominfo2(删除指定的自定义属性)、ADDcustominfo3(添加自定义属性的名称 和参数值)， 这些方法都要求指定文件的配置名称。 因此， 为了对当前模型文件和当前配置设定自定义属性， 必须首先要获得当前配置的名称， 利用 GetActiveConfiguration()方法可以获得当前模型文件配置的对象， 并 利用 Name 方法获得当前配置的名称。 Dim ConfName As StringSet CurCFG = activeDocument.GetActiveConfiguration() ConfName = CurCFG.Name 4.按照配置访问自定义属性在本程序中，笔者对于指定配置的属性设置按照如下的步骤： (1)按照配置名称读取文件中的自定义属性值，并赋值于相应的文本框; (2)判定当前文件和当前配置是否已经改变，如其中之一发生变化，则提示错误信息; (3)根据配置名称删除指定的自定义属性; (4)将相应文本框中的内容按照配置名称添加到模型文件自定义属性名称和参数值。下面对上述控制配 置自定义属性的三种方法加以介绍。 ☆ CustomInfo2：获取或设置当前文档指定配置的自定义属性的值。 value = ModelDoc.CustomInfo2 (configuration, fieldName) 其中，configuration 为配置名称; fieldName 为自定义属性的名称。 ☆ deletecustominfo2：删除当前文档指定配置的自定义属性的值 retval = ModelDoc.DeleteCustomInfo2(configuration, FieldName ) ☆ ADDcustominfo3：向当前文档中指定的配置添加自定义属性以及值retval = ModelDoc.AddCustomInfo3 ( configuration, FieldName, FieldType, FieldValue ) 其中，FieldType 为自定义属性的类型;FieldValue 为自定义属性的值。 下面这段代码是单击“确定”的子程序，为了简单，只给出了其中一个自定义属性的处理过程。 Private Sub cmd_OK_Click()On Error GoTo ERR_91 Dim swApp2 As ObjectDim activeDocument2 As ObjectDim curcfg2 As ObjectDim cfgname2 As StringDim retval As BooleanSet swApp2 = CreateObject(&SldWorks.Application&) Set activeDocument2 = swApp2.activedoc Set curcfg2 = activeDocument2.GetActiveConfiguration() cfgname2 = curcfg2.Name' 判断文件或配置是否改变，如改变，则提示错误。 If cfgname2 = ConfName And FilePath = activeDocument2.getpathname() Then retval = activeDocument2.deletecustominfo2(ConfName, &PartID&)' 添加属性 retval = activeDocument2.ADDcustominfo3(ConfName, &PartID&, swCustomInfoText, frmPartID) 保存文件 retval = activeDocument2.Save() Else Style = vbExclamation title = &模型自定义属性& Msg = &错误：打开的文件或配置已经改变!& & Chr(10) & &请重新执行本程序& Call MsgBox(Msg, Style, title) End End ' ' 删除属性设置IfERR_91: Style = vbExclamation title = &模型自定义属性& Msg = &程序运行错误，文件可能已经关闭& & Chr(10) & &自定义属性无法添加，单击确定退出!& Call MsgBox(Msg, Style, title) End End Sub 三、在 SolidWorks 界面中执行应用程序对于使用 VB 编译的 EXE、DLL 文件，目前 SolidWorks 还不 能直接支持这些文件作为插件使用，如果要在 SolidWorks 中直接调用通过 VB 编译的可执行程序，可以使 用 SolidWorks“宏”操作来进行。利用“宏”在 SolidWorks 界面中添加指定的应用程序后，就好像 SolidWorks 调用了自身的功能一样，利用类似的方法，可以在 SolidWorks 添加任何可执行的文件。下面利用“自定义 属性”程序来说明一下步骤。1.建立“宏”文件在 SolidWorks 中，我们利用录制并修改“宏”的方法来建立所需 要的“宏”文件。主要步骤如下： (1)选择菜单“工具→宏操作→录制”。 (2)停止录制，并保存宏文件。给定文件名称，如：Cpbom.swp。 (3)选择菜单“工具→宏操作→编辑”， Cpbom.swp “宏”文件录制的内容全部删除， 把 并输入下面的内容。 Sub main()MyAppID = Shell(&C:Program FilesCPbomCPbom.exe&, 1) AppActivate MyAppID End Sub (4)保存并退出宏编辑，返回到 SolidWorks 环境。 2.指定“宏”操作在 SolidWorks 中可以指定宏命令的文件位置，并定制工具栏，将所执行的宏操作按钮 添加到指定的位置上。 (1)选择菜单“工具→自定义→宏”，在“自定义”对话框中单击“宏”标签。 (2)参考图 4 的内容添加宏，单击“应用”完成。 (3)在“自定义”对话框中单击“命令”标签，从“类别”列表框中选择“宏”，将所定义的宏(第 1 个)的图标按 钮拖到相应的工具栏中，如图 5 所示。 (4)单击“确定”按钮，完成宏定义和工具栏定义。 3.执行应用程序定义“宏”以后，单击相应的图标就可以在 SolidWorks 中直接执行应用程序。 在 S olidWorks 中执行应用程序四、 总结笔者利用这个“自定义属性”程序， 明显提高了工作效率。 需要说明的是， SolidWorks API 的对象和方法十分丰富，涵盖了所有 SolidWorks 数据模型，这里介绍的只冰山之一角。另 外，程序中提及的自定义属性与企业的要求有关，根据自己的需要开发适合需要的自定义属性设置程序。复制是可以的，打开 vs2008&工具&选项&项目和解决方案&常规&Visual studio 用户项 目模板位置。找到该位置后把 swCSharpAddin.zip 复制到此位置即可在新建项目时看到 SwCSharpAddin 模板了我说的是 VC++，CSharp 模板向导是有的，VC++没用 SolidWorks COM add-in 的向 导。[闲聊] 运用 3 种开发工具的 SolidWorks 二次开发对比编程实践(一) SolidWorks, 工具, 实践, 开发 SolidWorks, 工具, 实践, 开发1 前言 随着计算机技术与网络技术的迅速发展， 越来越多的企业已经加大对于企业数字化信 息化的建设，购买了相应的三维设计软件及其相关产品，这无疑对加速企业产品开发进 程，缩短产品制造周期，提高产品质量，增强企业市场竞争力与创新能力发挥着重要作 用。然而在工程实践中，其专业针对性不强。为此，人们通常通过对 CAD 软件的二次开 发，开发符合国家标准、适合企业实际应用的功能模块，以极大地提高这一通用系统的 附加值，更好地满足企业设计要求，更好地发挥 CAD 的效能。 SolidWorks 软件是一款基于 Windows 平台开发的著名的全参数化三维实体造型软件， 其设计过程全相关性， 可以在设计过程的任何阶段修改设计， 同时牵动相关部分的改变。 同时 SolidWorks 具有良好的开放性和兼容性。基于这些优点，本文着重对 SolidWorks 的二次开发进行分析与研究。通过对该软件的二次开发，使其实现专业化、本地化，更 大程度上发挥软件的价值，为制造业信息化与快速化服务。 2 SolidWorks 二次开发的大体思路与一般方法 SolidWorks 通过 COM(Component Object Model，组件对象模型)技术为用户提供了 强大的二次开发接口(SolidWorks API)， 凡支持 COM 编程的开发工具， Visual Basic, 如 Delphi 等均可用于 SolidWorks 的二次开发。 SolidWorks 中常用的 API 对象如图 1 所示。 SldWorks 对象为对 SolidWorks 工作环境进行访问处理提供了接口。通过此对象可以对 SolidWorks 工作环境添加菜单、删除菜单、添加工具条、打开文件、新建文件、退出 SolidWorks 系统。SolidWorks 的 API 对象涵盖了全部的 SolidWorks 的数据模型，通过 对这些对象属性的设置和方法的调用，就可以在用户自己开发的 DLL 中实现与 SolidWorks 相同的功能。进行二次开发时，调用 SolidWorks 中的 API 函数，可以完成 零件的造型和修改，零件各特征的建立、修改、删除和压缩等各项控制，零件特征信息 的提取，如特征尺寸的设置与提取，特征所在面的信息提取及各种几何和拓扑信息，零 件的装配信息，零件工程图纸中的各项信息等[1]。图 1 SolidWorks API 对象层次图 SolidWorks 开发系统图如图 2 所示。 其基本工作流程为： 基于 OLE 技术的 SolidWorks API 将 SolidWorks 的各种功能封装在 SolidWorks 对象之中供编程调用， 开发者使用二次开 发编程语言通过调用 SolidWorks 的对象体系结构，操纵对象的属性和调用对象的方法 便可以建立自主的应用程序，实现二次开发[2-3]。图 2 SolidWorks 开发系统框图 随着计算机技术与网络技术的迅速发展， 越来越多的企业已经加大对于企业数字化 信息化的建设，购买了相应的三维设计软件及其相关产品，这无疑对加速企业产品开发 进程，缩短产品制造周期，提高产品质量，增强企业市场竞争力与创新能力发挥着重要 作用。然而在工程实践中，其专业针对性不强。为此，人们通常通过对 CAD 软件的二次 开发，开发符合国家标准、适合企业实际应用的功能模块，以极大地提高这一通用系统 的附加值，更好地满足企业设计要求，更好地发挥 CAD 的效能。 3 运用 3 种开发工具进行 SolidWorks 二次开发编程对比 为更好地帮助新人快速入门，笔者以一个简单的圆台参数化交互式调用为例，分别使用 VBA 语言、VB 语言及 Delphi 这三种不同的开发语言对其进行开发实现[4]，接下来详细 对比分析这几种语言二次开发时的优缺点及需注意的关键问题。 文中所使用的软件版本 依次为 SolidWorks 2007 企业版，Visual Basic 6.0 企业版及 Delphi 企业版软件。 3.1 编程准备 在程序编制前，首先是针对具体的开发工具，进行一些相关的应用或是设置工作。 3.1.1 类型库的导入 因为在使用 VB 语言及 Delphi 语言这两种开发工具进行 SolidWorks 二次开发时一 般采用的是 DLL 动态链接库方式， 必须导入相关的类型库， 接下来才能调用 SolidWorks 的对象、方法与属性。而对于采用 VBA 语言，即采用宏录制实现 SolidWorks 二次开发 的方式，由于宏是内嵌于 SolidWorks 的编程语言，不需要导入相关类型库。 对于 VB 而言，添加引用的步骤是：单击菜单栏中【工程】【引用】命令，选择 “SolidWorks exposed Type Libraries For add-in Use”(SolidWorks 插件库文件)、 “SolidWorks 2007 Type Libray”(SolidWorks 库文件)和“SolidWorks Consant Type library”(SolidWorks 常数库)，如图 3 所示。 对于 Delphi 而言，导入类型库的步骤是：单击主窗口中 “Project” “Import Type Library”命令，在弹出的如图 4 所示的“Import Type Library”对话框中对 SolidWorks 类型库进行注册，将类型库文件 SldWorks.tlb 装载到 Delphi 中。选中 “SolidWorks 2007 Type Library(Version f.0)“，单击“Creat Unit”按钮，Delphi 将在其 Import 子目录下生成该类型库的 Object Pascal 文件 Sldworks_TLB.Pas，该文 件包括 SolidWorks 提供的所有 API 函数。接下来单击主窗口中 “Project” “Add to Project”菜单命令，在弹出的 “Add to Project”对话框中，选择 Delphi 的 Import 子目录下 SolidWorks 类型库单元文件 Sldworks_TLB.pas，将其添加入工程中。下载 (110.11 KB)
09:57图 4 Delphi 中导入 SolidWorks 类型库对话框 3.1.2 编辑窗体界面 在编辑窗体一栏，三者的区别不大。其中 VB 语言与宏因为基于同一语言，编辑窗体时 操作一致，Delphi 语言的窗体编辑业余前两者相似，只是组件名的稍微区别(如文本编 辑组件在 Delphi 中使用 Edit 控件，而在 VB 中使用 TextBox 控件)。三种语言下编辑好 的窗体界面如图 4 所示，接下来便是设置相应控件属性。下载 (13.85 KB)
09:59图 4 编辑后窗体界面 3.2 程序编制 3.2.1 接口相关文件编制 在调用 SolidWorksAPI 函数进行零部件建模之前，首先编写接口相关文件，设置好绘图 环境。相关的源代码如下如图 5 所示：下载 (46.24 KB)
10:05下载 (55.57 KB)
10:05图 5 接口相关文件编制源代码 从上述源代码中可以分明看出，语句简洁的是宏语言和 VB 语言，从定义变量直到获取 SolidWorks 接口并新建一个零件文件只需要简单的几句语句即可实现，速度最高。而 Delphi 需要的语句最多，同时对于程序中的变量需要预先定义，其接口相关文件编制 较为繁琐。但特别之处的一点就是 Delphi 语言的自动化程度较高，如添加一个组件的 话，在“type”中会自动添加该组件的类型和过程的声明。 3.2.2 零部件建模命令的实现 完成接口相关文件编制及环境设置之后，接下来的任务就是绘制图形。使用三种开 发工具绘制圆台的源代码如图 6 所示：下载 (168.38 KB)
10:05图 6 绘制圆台的源代码 通过对比上述源代码，可以看出，宏语言和 VB 语言中绘制圆台程序一致(仅有变量 参数不同)。 Delphi 与上述二者的差别较大， 主要是 API 函数内参数形式与内容的不同， 语句的格式及所使用的 API 函数相同，参照 Delphi 语言格式要求可以很方便地对宏录 制的相关源码进行修改与完善，以提高 Delphi 语言编程速度与效率。 4 结论本文使用 VBA 语言、VB 语言及 Delphi 这三种不同的开发语言实现了一个简单的圆 台参数化交互式绘制程序，对二次开发过程中的相关问题做了详细的对比分析。通过实 际编程过程，对于上述三种开发工具的优缺点有了更加明确的认识： (1)使用 VBA 进行二次开发(即通过宏录制及编辑实现二次开发)，优点在于：操作 简便;可使得重复的任务自动化;定制和扩展客户应用程序功能;将客户应用程序及数据 集成到其他应用程序中;最大的优点在于可以便捷高效地实现工作任务。但其缺点在于 使用 VBA 开发的程序不能脱离他的宿主程序，可移植性不好，必须在“父”环境中才可 以得以实现;且录制的代码混乱，必须经过修改与调试才能最终得以实现。 (2)使用 VB 进行二次开发，优点在于：代码简洁，易于编辑，可读性很强;简单易 学，学习过程中很容易上手;功能齐全，程序员可以轻松的使用 VB 提供的组件进行二次 开发，快速建立属于自己的应用程序，在其各项高效强大集成功能的支持下，最终可方 便快速地完成二次开发任务，是一个最为理想的二次开发工具。 (3)使用 Delphi 进行二次开发，优点在于：Delphi 同时兼备了 VC 功能强大和 VB 简单易学的特点， 学习过程中很容易上手， 自动化程度很高且集成了强大的数据库功能， 也是用于二次开发的一个强大而高效的工具。但其缺点在于接口相关文件编制较为繁 琐，且不能较为直接地利用宏录制这一高效的参考工具，因此开发效率稍逊于与宏录制 同一“语系”的 VB 语言。 通过对 CAD 软件的二次开发，开发符合国家标准、适合企业实际应用的功能模块， 以极大地提高这一通用系统的附加值，更好地满足企业设计要求，已经成为信息化、数 字化时代的客观需要与必然发展趋势。希望本文的论述能够为新人入门及迅速掌握 SolidWorks 二次开发的思想与技巧提供帮助，共同提升 CAD/CAE 等通用软件的附加值， 为制造业信息化、数字化与快速化服务。
Solidworks二次开发入门教程——提供以文本文档的格式的各类文档免费下载和在线浏览。