小妹最近在进行最后的课题冲刺啊,导师给了个难题
要求在VB运行时,根据选定的两个装配体(SLDASM文件,已知路径),打开Solidworks绘图程序的装配界面,对这两个装配体进行配合。
我自己降低了一下难度,只要能在VB中设置按钮,能打开Solidworks就行了。有人建议我使用API,但是它的声明和函数好难啊。
不知道哪位高手能够帮忙啊~~~
我的积分不多,先奉上30,有好的回答的话,一定加分!!!保证!!!
參考答案:Dim swApp As SldWorks.SldWorks
Dim swSelMgr As SelectionMgr
Dim part As modelDoc
'如果sw没有启动,启动他。
Set swApp = CreateObject("SldWorks.Application")
swApp.Visible = True
'如果没有当前文档,新建一个。
Set part = swApp.ActiveDoc
If (part Is Nothing) Then
Set part = swApp.NewPart()
ElseIf (part.GetType = 3) Then
Set part = swApp.NewPart()
End If