| 查看: 477 | 回复: 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
» 猜你喜欢
CSC难上岸,25年东京大学,早稻田,京都大学多Lab大量招募日本全奖博士生!
已经有2人回复
硅溶胶和硅酸钠水玻璃干燥后的结构为什么出现明显差异?
已经有6人回复
工程热物理与能源利用论文润色/翻译怎么收费?
已经有126人回复
5--羟甲基糠醛电催化氧化性能测试
已经有0人回复
请高手指点:用orgin怎样绘制随x轴渐变色,多种颜色波长对应x轴坐标。
已经有0人回复
西南地区哪里可以测试LED样品的发光性能?
已经有0人回复
【26年入学】红外半导体/电子信息/嵌入式视觉/诚招博士生 光电教育部重点实验室
已经有0人回复
哪位用MS构建过新型石墨烯模型? 哪里可以下载新型石墨烯模型
已经有0人回复
找到一些相关的精华帖子,希望有用哦~
机械“参数化”一键出图,solidworks参数化二次开发,autoCAD2012参数化尺寸驱动
已经有14人回复
VB与solidworks代码问题
已经有3人回复
用vb进行二次开发,具体如题
已经有6人回复
solidworks二次开发 基准面绘制草图
已经有11人回复
【求助】VC++.NET编程,MFC基于对话框应用程序编写
已经有18人回复
【求助】求助有没有做VC++ 对SolidWorks二次开发的
已经有3人回复
科研从小木虫开始,人人为我,我为人人













回复此楼
点击这里搜索更多相关资源