我做solidworks二次开发时，运行程序界面无反应，请专业人士指点，不胜感谢

Posted 2023-05-06

Dim swApp As Object
Dim activeDocument As Object
Dim boolstatus As Boolean
Sub main()

Set swApp = CreateObject("SldWorks.Application")
Set activeDocument = swApp.ActiveDoc

If (activeDocument Is Nothing) Then
Dim Msg, Style, title
Style = vbExclamation
title = "模型自定义属性"
Msg = "请首先打开一个Solidworks模型文件"
Call MsgBox(Msg, Style, title) ' Display error message
End
End If

Dim docType As Long
Dim docName As String
Dim filename As String
Dim FilePath As String
docType = activeDocument.GetType
If (docType = swDocPART) Then
docName = "零件"
With 零件属性添加工具frm
.deldescription.Enabled = False
.delmaterial.Enabled = False
End With
Picture5.Picture = Picture3.Picture
ElseIf (docType = swDocASSEMBLY) Then
docName = "装配"
Picture5.Picture = Picture2.Picture
ElseIf (docType = swDocDRAWING) Then
Style = vbExclamation
Msg = "当前文件是工程图文件，请打开零件或装配文件"
Call MsgBox(Msg, Style, title) ' Display error message
End
End If
filename = activeDocument.GetTitle()
FilePath = activeDocument.GetPathName()
End Sub

Private Sub Command4_Click()
Form2.Show 1 '显示为模式窗体
End Sub

Private Sub Command3_Click() '命令按钮的单击事件
Unload Form1
End Sub

我以前做过用VB开发ProE，需要安装一个第三方软件，而且需要配置连接。
SW我没开发过。
下面是我用VB开发ProE做的连接：
下载了一个第三方软件AGW4.2进行安装，试了好几次终于成功了，里面关键的一步是找到ProE的安装路径，然后找到AGW4.2的许可证。前几次安装不成功都是因为我找的是ProE的许可证。弄清楚之后找到了AGW4.2的许可证，并且将该许可证更名为license.dat后复制到安装目录下，然后再连接就可以成功了。当然连接之前要起动ProE，否则还是连接不成功。你的计算机安装有多个ProE的话，可以在环境变量里面修改，将不同版本的ProE的安装目录都放在一起，用分号隔开。AGW4.2支持ProE wildfire 2.0以上的版本。
打开ProE，再打开AGW4.2进行连接，连接成功后就可以用VB进行简单的编程，试了一个示例，还可以。（后来发现不起动AGW4.2也一样。）
首先练得是一个AGW4.2自带的一个VB程序。用这个小程序可以打开原先用ProE做的模型，可以设定工作目录，可以关闭并拭除。从这里面主要了解了需要建立一个AGW对象，然后用这个AGW对象来操作ProE。而在VB里面要引用这个对象，因此在工程里面添加引用，浏览到AGW4.2的安装目录，把GWAX.exe加进来，这样就可以用AGW对象了。
后来开始自己编齿轮的程序，用尺寸约束可以实现，但是渐开线又成了问题。不能实现全参数化，所以就开始琢磨用VB改ProE里面的参数。因此在ProE中建模就有技巧，不能锁定这些参数，得允许VB修改这些参数。结果一试还真好用，一下子就成功了，我特高兴。终于实现了在VB里面写几句程序，生成对话框，填几个参数就能让ProE里面自动再生齿轮。那些关于ProE二次开发发表的论文所实现的东西我也能做到了。
这里面有软件和软件匹配的问题，还有解决问题的方法问题，总之，这个星期让我看到了用VB操纵ProE的可能性。追问

我觉得solidworks插件没那么麻烦，在编程时选用“工程”-“引用”里面的库文件就可以了，我做过简单的圆柱体，没问题；现在我想把零件属性添加到工程图中，别人做过了，我只想完善一下，只是编程还不熟悉，不知谁能提供源程序或指点一下

追答

你说的这种方式和CAD的二次开发类似，用软件自带的开发工具如VBA来做。
你说的要把零件属性添加到工程图中，可以考虑这样做：
可以把材料、重量等等零件属性都设成参数，这样零件图有了，工程图里面自然也就有了。

参考技术A 兄弟你太专业了，人才啊，solidworks群期待您这样的人才加入！相互交流学习

labview NI softmotion与SolidWorks联合仿真问题

我做的labview与SolidWorks联合仿真，labview可以运行，SolidWorks中也显示运动逝去时间，但是，三维模型不会动，请问该如何修改程序？我查看了labview自带的范例，也是出现上述情况，请问大家，该如何修改程序？下面是labview自带范例运行过程，但是，SolidWorks中，三维模型还是不会运动。

控制面板图框程序如下：

solidworks 先打开，蓝色圈画的选中。


再打开labview新建项目，在项目中添加模型，一般是模型，电机轴。这两项，然后再新建VI。

最后再labview里面写完程序后，需要去设置和部署，比如右键电脑，再电脑属性里勾选部署时启动扫描引擎，还有X轴需要设置等等。

一般就是这个步骤，不知道楼主运行时有没有缺少其中的步骤。

参考技术A 这个要进行solidworks二次开发的，肯定是要通过用VBA来嫁接的，没有理由能直接连接啊，soildworks有提供过这个功能的插件么?没有就自己开发好了呗。追问

不知道啊，难道labview softmotion与SolidWorks连接上之后，模型不会动吗？那么NI softmotion与solidworks可以做动画、基本运动、运动分析，模型都不会运动吗？

追答

一般用soildworks做动画，直接用soildworks的时间轴上编辑就行了，很多动作如果有严格的数学关系，而用solidwork又没法模拟的，就之好通过编程了。如果你要外接的程序来输入参数让soildworks的模型发生变化，你的模型就必须是用公式建模的。当然你要搞这个的话，不是很简单的哦。我只是知道有这么回事，但是soildworks的二次开发我也只是做些方便建模的小程序而已，要是做动画的话，绝对必须是很麻烦的。但是做出来也是十分好看的，应该来讲，比其他动画软件还要真实吧。

本回答被提问者和网友采纳