'循环判断是否存在序号不连贯，如果存在插入空白行，并写入相应数值

　　For i = 0 To rowNum - 1

　　If tab1(i) - tab1(i + 1) > 1 Then

　　For j = 1 To tab1(i) - tab1(i + 1) - 1

　　bRet = tableAnn(0).InsertRow(2, t + 1)

　　tableAnn(0).Text(t + 1, 0) = tab1(0) - t - 1

　　t = t + 1

　　Next j

　　End If

　　t = t + 1

　　Next i

　　……

　　Set BomTable = swView.InsertBomTable(Bomtemplate, vPickPt(0), vPickPt(1), nErrors)

　　……

　　3.6工程图调整结果

　　图4起重机车轮组轴工程图轴调整结果

　　4结束语

　　通过工程图的二次开发，可以建立满足用户需求的工程图系统，明显提高了工作效率，方便了对工程图文件的后处理工作。需要说明的是，SolidWorksAPI的对象和方法十分丰富，SolidWorks提供了几百个API应用程序接口函数，这些API函数是OLE (对象的嵌入与链接)或COM (组件对象模型)接口，用户可以使用 VB\VBA\VC等多种高级语言对SolidWorks进行二次开发，从而建立适合用户需要的、专用的SolidWorks功能模块。

　　参考文献

　　[1] Solid Works 公司.SolidWorks API 二次开发[M].北京:机械工业出版社,2005.5.

　　[2] Dave Strearns.Microsoft Office 2000 Web Components编程技术内幕[M].北京:北京希望电子出版社,2000.5.

　　[3] 江洪, 李仲兴, 邢启恩.SolidWorks2003 二次开发基础与实例教程[M].北京:电子工业出版社,2003.

　　[4] 刘志更. 桥式起重机桥架参数化设计关键技术研究[D]. 中北大学, 2007.3.

　　[5] 陆利峰, 江洪, 伍锦辉等.SolidWorks工程师高级教程[M].北京:化学工业出版社, 2006.12.

　　[6] 邢启恩,任雷主编. Solidworks2007国标工程图案例与精粹[M].北京:机械工业出版社, 2006.11.

　　[7] SolidWorks公司. SolidWorks工程图[M].北京:机械工业出版社,2005.11.

　　[8] 黄阳,刘萍萍. 基于SolidWorks的企业专用BOM表的生成技术研究[J].CAD/CAM,2003

 3/3   首页 上一页 1 2 3