| 查看: 552 | 回复: 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
» 猜你喜欢
已确定
已经有2人回复
-
北京航空航天大学宇航学院 张新华副教授课题组招收 2026年申请考核制博士生
已经有2人回复
-
工程热物理与能源利用论文润色/翻译怎么收费?
已经有189人回复
-
力学研究所某专项团队支撑岗位和特别研究助理岗位招聘启事(长期有效)
已经有10人回复
-
力学研究所某专项团队支撑岗位和特别研究助理岗位招聘启事
已经有10人回复
-
分享一个可以用于高精度模拟液态碳氢燃料相变的LAMMPS程序
已经有0人回复
-
有幸中面上，特来还愿
已经有111人回复
-
国防科技大学喷雾燃烧与低温推进导师组2027 年博士生及硕士生招生
已经有0人回复
-
国防科技大学喷雾燃烧与低温推进导师组2027 年博士生及硕士生招生
已经有0人回复
-
SCI 帮引用我的paper有偿，谢谢！
已经有2人回复
-
青C基金意见评审
已经有15人回复
找到一些相关的精华帖子，希望有用哦~
机械“参数化”一键出图，solidworks参数化二次开发，autoCAD2012参数化尺寸驱动
已经有14人回复
- VB与solidworks代码问题
已经有3人回复
- 用vb进行二次开发，具体如题
已经有6人回复
- solidworks二次开发 基准面绘制草图
已经有11人回复
- 【求助】VC++.NET编程，MFC基于对话框应用程序编写
已经有18人回复
- 【求助】求助有没有做VC++ 对SolidWorks二次开发的
已经有3人回复
点击这里搜索更多相关资源科研从小木虫开始，人人为我，我为人人