在SolidWorks平台上进行机床夹具定位元件二次开发

    是世界上第一个基于Windows的优秀三维设计软件，工程人员在利用进行机床夹具设计时经常会用到定位元件中的定位销、支撑钉、定位心轴等定位元件，如果能够开发出一个机床夹具定位件库，当用到这些定位件时可以直接在库中调用这些元件，那么就可以节省很大的时间和精力。本文即是讲述运用Visual Basic对SolidwoAs进行二次开发，得到一个机床夹具定位件库。

    1 VB对开发的基本原理

    (1) API应用程序接口，是基于ActiveXAutomation的编程接口，凡支持COM编程的开发工具均可对其进行二次开发。COM不仅定义了组件程序之间进行交互的标准，而且也提供了组件程序运行所需的环境。对象链接与嵌入OLE技术是COM技术的应用，它使应用程序之间能通过数据嵌入或链接的方式共享数据。支持COM技术标准，同时也支持OLE技术。作为一个COM／OLE服务器，提供了大量的API／COM OLE对象以及这些对象所拥有的方法和属性，涵盖了全部的的数据模型，用户通过在客户应用程序中对这些API对象及其方法和属性的操作，可以实现的功能定制与扩展，满足用户的专业要求。

    (2)的对象模型属于多层次的对象网络(其结构见图1)。其中Sldworks对象位于最顶端，它为VB对工作环境进行访问处理提供了接口。通过此对象可以对工作环境进行添加菜单、删除菜单、添加工具条、打开文件、新建文件、退出SolidWorks系统等操作。用VB调用SolidWorks中的API函数，还可以完成零件的建造和修改；实现零件各特征的建立、修改、删除和压缩等各项控制；提取零件特征信息，如特征尺寸的设置与提取，特征所在面的信息提取及各种几何和拓扑信息。

    在对SolidWorks进行二次开发时，首先要建立SolidWorks的链接，创建SolidWorks的应用对象：

    Dim swApp AsObjeet

    Set swApp =CreateObject("SldWorks．Application")

    通过这个函数，就打开了SolidWorks的接口，这时就可以调用它的子函数了。例如在上视基准面上插入草图：

    boolstatus=Part．Extension．SelectBylD("上视基准面"，"PLANE"，0，0，0，False，0，Nothing)Part．InsertSketch2 True

    2 夹具库的开发

    2．1 开发方法

    机床夹具零件的通用性比较好，就像标准件一样，因此我们可以利用Access建立机床夹具定位件的各种元件的尺寸数据库(如图2所示)，然后利用VB编程设计出来一个设计定位件库的界面(如图3所示)，在这个界面中利用制定好的数据库中的尺寸来驱动建模，从而在SolidWorks界面中生成需要的定位件。