VB对solidworks进行二次开发
本次的开发均使用简单圆柱为例进行solidworks二次开发
方法一：借助API绘图函数
1.使用宏录制圆柱的建模过程，录制代码如下：
2.在VB程序开发环境中建立标准EXE文件，并且引用solidworks类型库，其引入步骤如
下：单击菜单栏中【工程】【引用】命令，选择“SolidWorks exposed Type Libraries For add-in Use”(SolidWorks插件库文件)、“SolidWorks2007Type Libray”（SolidWorks库文件）和“SolidWorks Consant Type library”（SolidWorks常数库）
3.在VB开发环境中添加2个lable控件，2个textbox控件，2个commandbutton控件，
并将lable控件分别命名为圆柱直径，圆柱长度，将commandbutton控件分别命名为连接solidworks，开始绘制。
程序界面如下：
4.代码编写
A．在代码编写窗口，通用区定义变量，代码如下：
Dim swapp As Object
Dim part As Object
Dim boolstatus As Boolean
'定义接口
B．双击第一个commandbutton控件，并且写入如下代码：
Set swapp=CreateObject("SldWorks.Application")
Set part=swapp.NewPart()
弹出窗口代码编写swapp.Visible=True
'获取solidworks软件接口并新建一个零件文件
（至此，就可以使用VB启动solidworks）
C．双击第二个commandbutton控件，并把solidworks录制的宏文件的相关代码复制到VB的第二个commandbutton控件Click的事件中，并且对代码进行修改，修改后的代码如下：
boolstatus=part.Extension.SelectByID2("前视","PLANE",0,0,0,False,0, Nothing,0)
part.SketchManager.InsertSketch True
part.ClearSelection2True
Dim skSegment As Object
Set skSegment=part.SketchManager.CreateCircle(0#,0#,0#, Val(Text1.Text)/2000,0,0#)
part.ShowNamedView2"*上下二等角轴测",8
part.ClearSelection2True
boolstatus=part.Extension.SelectByID2("Arc1","SKETCHSEGMENT",0,0, 0,False,0,Nothing,0)
Dim myFeature As Object
Set myFeature=part.FeatureManager.FeatureExtrusion2(True,False, False,0,0,Val(Text2.Text)/1000,0,False,False,False,False,0,0,False,False,False,
False,True,True,True,0,0,False)
part.SelectionManager.EnableContourSelection=False
5.单击VB中的启动按钮，先进性程序调试，调试结果如下：
注意：在solidworks的API函数中的单位是米，如Set skSegment=
part.SketchManager.CreateCircle(0#,0#,0#,Val(Text1.Text)/2000,0,0#)，至于除以2000的原因是API中的绘制圆的函数，是以半径为参数。各函数的特点可以参考solidworks 中的API帮助）
方法二：借助access数据库
1.依照方法一的前两步操作
2.使用solidworks绘制一个圆柱，命名为圆柱，并且保存在硬盘中，记下硬盘的位置，
本例保存位置为："F:\资料\SW\代码\圆柱.SLDPRT"
3.在VB中添加部件
adodc控件
在VB6.0种选择“工程”菜单，再点击“部件”菜单项，在弹出的“部件”
对话框中选中“Microsoft ADO Data Control6.0(OLEDB)”选项即可。
DATAGRID控件
在VB6.0种选择“工程”菜单，再点击“部件”菜单项，在弹出的“部件”
对话框中选中“Microsoft DataGrid Control6.0(OLEDB)”选项即可。
工程引用：
要能正确引用ADO数据对象，应在VB6.0集成开发环境中选择“工程”菜单，再点击“引用”菜单项，在弹出的“引用”对话框中选中“Microsoft ActiveX Data Objects2.7Library”选项来添加ADO数据对象类型库。
4.制作圆柱的access数据库
可以直接在Visual Basic6.0集成开发环境中通过“可视化数据管理器”来创建
数据库如下图操作：
A.
B.
C.
D.单击“添加字段”，建立圆柱直径和圆柱长度两个字段，并把字段类型设置为double
E.右击yuanzhu，选择打开，在弹出的对话框中选择添加，添加几组数据
5.使用label，commandbutton，textbox，adodc，datagrid控件，设计VB的程序界面,
其界面如下：

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。