副標題#e#    SolidWorks是世界上第一個基于Windows的優秀三維設計軟件，工程人員在利用SolidWorks軟件進行機床夾具設計時經常會用到定位元件中的定位銷、支撐釘、定位心軸等定位元件，如果能夠開發出一個機床夾具定位件庫，當用到這些定位件時可以直接在庫中調用這些元件，那么就可以節省很大的時間和精力。本文即是講述運用Visual Basic對SolidwoAs進行二次開發，得到一個機床夾具定位件庫。
   

    1 VB對SolidWorks開發的基本原理
   
    (1)SolidWorks API應用程序接口，是基于ActiveXAutomation的編程接口，凡支持COM編程的開發工具均可對其進行二次開發。COM不僅定義了組件程序之間進行交互的標準，而且也提供了組件程序運行所需的環境。對象鏈接與嵌入OLE技術是COM技術的應用，它使應用程序之間能通過數據嵌入或鏈接的方式共享數據。SolidWorks支持COM技術標準，同時也支持OLE技術。作為一個COM／OLE服務器，SolidWorks提供了大量的API／COM OLE對象以及這些對象所擁有的方法和屬性，涵蓋了全部的SolidWorks的數據模型，用戶通過在客戶應用程序中對這些API對象及其方法和屬性的操作，可以實現SolidWorks的功能定制與擴展，滿足用戶的專業要求。
   
    (2)SolidWorks的對象模型屬于多層次的對象網絡(其結構見圖1)。其中Sldworks對象位于最頂端，它為VB對SolidWorks工作環境進行訪問處理提供了接口。通過此對象可以對SolidWorks工作環境進行添加菜單、刪除菜單、添加工具條、打開文件、新建文件、退出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界面中生成需要的定位件。