VB二次开发Solidworks精讲.docx

运用VB语言实现二次开发1 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里添加引用，单击菜单栏中【工程】【引用】命令，选择SolidWorksexposed Type Libraries For add-in Use(SolidWorks插件库文件)、SolidWorks2007 Type Libray（SolidWorks库文件）和SolidWorksConsant Type library（SolidWorks常数库），如图3所示。本文其实只用到了SolidWorks2007 Type Libray（SolidWorks库文件），但为了方便以后的程序扩展，将上述三种常用库文件一并添加。 图3 引用SolidWorks类型库 2.3 编辑窗体界面 （1）拖动工具箱组件板上的Lable控件、TextBox控件及CommandButton控件到Form上。 （2）接下来在属性窗口将Lable1、Lable2的属性分别设置为圆台半径：、圆台高度：；将CommandButton1、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) / 1000, 0.01, False, False, False, False, 0, 0, False, False, False, False, 1, 1, 1建立模型 End Sub点击启动SolidWorks交互式绘图后，程序调用SolidWorks自动绘制的圆台三维图如图5所示。可交互式修改参数，直至达到满意的效果。操作完成后点击退出SolidWorks环境可以自动关闭并退出SolidWorks环境。 图5 交互式绘图后结果 3 小结 本文同样以一个简单实例的实现过程为例，采用VB语言编制了相关程序，详细介绍了二次开发的具体实现过程，给出了重要文件的引用、属性设置、接口程序的编制和事件处理等过程的完整代码。通过上述实例的实现过程，可以看出： VB语言简单易学，学习过程中很容易上手；功能齐全，程序员可以轻松的使用VB提供的组件进行二次开发，快速建立属于自己的应用程序，在其各项高效强大集成功能的支持下，最终可方便快速地完成二次开发任务。 参照连载1中的通过宏录制实现的二次开发过程，可以清楚地看到，利用VB二次开发实现圆台绘制的具体命令源代码不需要自己编写，可以直接对宏录制的相关源码拷贝过来加以利用即可，只需要修改其中的相关变量参数诸如Val(R.Text)即可，易于实现，减轻了程序员的工作量，提高了程序的开发速度。利用宏录制实现二次开发 1 VBA及其与宏录制的关系 1.1 VBA简介 Visual Basic for Applications（简称VBA）是新一代标准宏语言，是基于Visual Basic for Windows 发展而来的。它与传统的宏语言不同，传统的宏语言不具有高级语言的特征，没有面向对象的程序设计概念和方法。而VBA 提供了面向对象的程序设计方法，提供了相当完整的程序设计语言。VBA 易于学习掌握，可以使用宏记录器记录用户的各种操作并将其转换为VBA 程序代码。这样用户可以容易地将日常工作转换为VBA 程序代码，使工作自动化。因此，学用VBA 有助于使工作自动化，提高工作效率。另外，由于VBA 可以直接应用宿主软件的各项强大功能，所以对于程序设计人员的程序设计和开发更加方便快捷。 VBA是一种自动化语言,它可以使常用的程序自动化,可以创建自定义的解决方案。可以认为VBA是非常流行的应用程序开发语言Visual Basic 的子集，实际上VBA是寄生于VB应用程序的版本。VBA 作为一种新一代的标准宏语言，具有跨越多种应用软件并且具有控制应用软件对象的能力，使得程序设计人员仅需学习一种统一的标准宏语言，就可以转换到特定的应用软件上去，程序设计人员在编程和调试代码时所看到的是相同的用户界面，而且VBA 与原应用软件的宏语言相兼容，以保障用户在代码和工作上的投资。有了VBA 以后，多种应用程序共用一种宏语言，节省了程序人员的学习时间，提高了不同应用软件间的相互开发和调用能力。VBA 不但继承了VB 的开发机制，而且VBA 还具有与VB 相似的语言结构，它们的集成开发环境IDE（Intergrated Development Environment）也几乎相同。但是，经过优化，VBA 专门用于Office 的各应用程序。缺点在于VB 可运行直接来自操作系统桌面上的应用程序，而VBA 的项目（Project）仅由使用VBA 的宿主应用程序来调用。1.2 宏与宏录制 计算机科学里的宏是一种抽象，它根据一系列预定义的规则替换一定的文本模式。解释器或编译器在遇到宏时会自动进行这一模式替换。对于编译语言，宏展开在编译时发生，进行宏展开的工具常被称为宏展开器。宏这一术语也常常被用于许多类似的环境中，它们是源自宏展开的概念，这包括键盘宏和宏语言。绝大多数情况下，使用宏这个词的使用暗示着将小命令或动作转化为一系列指令。 宏的用途在于自动化频繁使用的序列或者是获得一种更强大的抽象能力。 VBA一般是与宏录制过程密切相关的。通过在SolidWorks中进行宏录制，不仅可以记录下建模时所用到的命令代码，也可以记录其它相关过程的底层操作源代码，同时也可以直观快捷地编译、修改与完善所录制的宏命令，从而可较大地提高系统的自动化水平与工作人员的工作效率。同时，SolidWorks提供了强大与完善的API帮助文件，可以很好地为编程工作服务，随时进行答疑解惑。 2 利用宏录制实现圆台交互式绘制程序的详细开发过程 本文以一个简单的圆台实例为例，详细讲解这一开发过程。 （1）首先是进入SolidWorks环境，新建一个零件如图1所示。 图1 SolidWorks主界面示意图 （2）点击宏文件工具条中宏录制按钮进行录制，接下来进行零件的绘制。绘制完毕后单击停止按钮进行宏文件的保存。 （3）打开录制宏的源代码，如下所示： Dim swApp As Object Dim Part As Object Dim SelMgr As Object Dim boolstatus As Boolean Dim longstatus As Long, longwarnings As Long Dim Feature As Object Sub main() Set swApp = Application.SldWorks Set Part = swApp.ActiveDoc Set SelMgr = Part.SelectionManager boolstatus = Part.Extension.SelectByID2(前视基准面, PLANE, 0, 0, 0, False, 0, Nothing, 0) Part.ClearSelection2 True Part.CreateCircle 0, 0, 0, -0.0275447640118, 0.008279351032448, 0 Part.ShowNamedView2 *上下二等角轴测, 8 Part.ClearSelection2 True boolstatus = Part.Extension.SelectByID2(Arc1, SKETCHSEGMENT, 0, 0, 0, False, 0, Nothing, 0) Part.FeatureManager.FeatureExtrusion2 True, False, False, 0, 0, 0.06, 0.01, False, False, False, False, 0.01745329251994, 0.01745329251994, False, False, False, False, 1, 1, 1, 0, 0, False Part.SelectionManager.EnableContourSelection = 0 End Sub （4）宏录制的程序代码比较混乱，存在过多的冗余代码，占用内存空间并影响浏览与调试过程的正常进行，需要进行修改与整理。 修改与整理的一般原则是：删除掉程序中未使用到得变量声明；清除选择代码可以去除；选择轮廓代码可以去除；选择圆等操作代码可以去除；程序中出项的随机参数应进行修改等等。此处特别注意的一点就是，在某些操作环境下，可能录制的宏不能直接运行，此时的一种解决办法就是将上述语句中的Set swApp = Application.SldWorks；Set Part = swApp.ActiveDoc；Set SelMgr = Part.SelectionManager三句代码替换为以下较为通用的语句：Set swApp = Application.SldWorks；Set Part = swApp.NewPart；Set Part = swApp.ActiveDoc。 考虑到要实现圆台参数化交互式调用的功能，右键点击工程资源管理器中宏1目录下SolidWorks 对象子对象，在弹出菜单中依次选中插入-用户菜单，接下来在新建立的窗体上依次添加两个lable控件、两个Textbox控件及两个CommandButton控件，设置好控件属性，界面如图2所示。 图2 用户菜单主界面 修改后的代码如下所示1： Dim swApp As Object Dim Part As Object Dim boolstatus As Boolean Private Sub cmdCreate_Click() Set swApp = Application.SldWorks Set Part = swApp.NewPart Set Part = swApp