| 查看: 507 | 回复: 0 | ||
[求助]
SolidWorks的VB开发的问题
|
|
我做的是http://wenku.baidu.com/view/bc3621fdc8d376eeaeaa3101.html这个网页上的例子，就是编一个VBS脚本，解析尺寸参数，然后输出为X_T格式，运行的时候报错！有没有大神能不能帮忙看一下错在哪了？代码： Dim swApp Dim Part On Error Resume Next Set swApp = GetObject(, "SldWorks.Application" ） If Err Then Err.Clear Set swApp = CreateObject("SldWorks.Application" ) Set Part = swApp.ActiveDoc swApp.Visible = true swApp.UserControl = True End If Set objFSO = CreatObject("Scripting.FileSystemObject" ) Set objFile = objFSO.GetFile("beam.SLDPRT" ) Set Part = swApp.OpenDoc(objFSO.GetAbsolutePathName(objFile),1 ) Set Part = swApp.ActivateDoc("beam.SLDPRT" ) swApp.Visible = true On Error GoTo 0 Call ChangePara(Part,0.05,0.02,0.02,0.02,0.05,0.02,0.2 ) Sub ChangePara(Part,Val1,Val2,Val3,Val4,Val5,Val6,Val7 ) Part.Parameter("HeightUp@草图1" ).SystemValue = Val1 Part.Parameter("HeightDown@草图1" ).SystemValue = Val2 Part.Parameter("FlangeRight@草图1" ).SystemValue = Val3 Part.Parameter("FlangeLeft@草图1" ).SystemValue = Val4 Part.Parameter("Height@草图1" ).SystemValue = Val5 Part.Parameter("Width@草图1" ).SystemValue = Val6 Part.Parameter("Length@凸台-拉伸1" ).SystemValue = Val7 Part.EditRebuild End Sub Part.SaveAs(objFSO.GetParentFolderName(objFile) & "\" & "beam.X_T" ) swApp.CloseDoc "beam.SLDPRT" 错误：  附件为模型[ Last edited by 1990chs on 2013-11-25 at 22:58 ] |
回复此楼» 本帖附件资源列表
-
欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com - 附件 1 : beam.zip
2013-11-25 22:55:47, 48.62 K
» 猜你喜欢
【博士招生】材料科学与工程专业（金属类）博士研究生，非诚勿扰。
已经有122人回复
-
哈尔滨工程大学动力学院赵建辉团队招收2026博士研究生
已经有10人回复
-
机械工程论文润色/翻译怎么收费?
已经有111人回复
-
使用高温激光共聚焦显微镜原位观察高强度海工钢的贝氏体转变
已经有0人回复
-
378分一志愿大连理工大学车辆工程调剂
已经有0人回复
-
08工科求调剂
已经有4人回复
-
英国格拉斯哥大学招生机器人方向博士生
已经有0人回复
-
通过高温激光共聚焦显微镜原位观察Fe-Al-Ti-O熔体中多种氧化物夹杂物的团聚行为
已经有0人回复
-
283求调剂
已经有0人回复
找到一些相关的精华帖子，希望有用哦~
机械“参数化”一键出图，solidworks参数化二次开发，autoCAD2012参数化尺寸驱动
已经有14人回复
- VB与solidworks代码问题
已经有3人回复
- 用vb进行二次开发，具体如题
已经有6人回复
- solidworks二次开发 基准面绘制草图
已经有11人回复
- 【求助】VC++.NET编程，MFC基于对话框应用程序编写
已经有18人回复
- 【求助】求助有没有做VC++ 对SolidWorks二次开发的
已经有3人回复
点击这里搜索更多相关资源科研从小木虫开始，人人为我，我为人人
