QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
7天前
查看: 2194|回复: 0
收起左侧

[讨论] Solidedge二次开发 部件与部件装配

[复制链接]
发表于 2010-10-16 09:37:36 | 显示全部楼层 |阅读模式 来自: 中国北京

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
各位大侠请问一下,用VB进行装配的二次开发,如果有部件该如何装配,
/ j6 U5 R! _0 N% g. B例如我写了一段程序
+ [& s, |& t$ n7 o" o) ^set objDoc=objApp.Documents.Add("SolidEdge.AssemblyDocument")  d* M0 S" Z$ v( m/ @% A/ U
File=App.Path+"\1.asm"3 `3 x4 c1 J4 p# g! u* t+ k5 m
Set objPart=objDoc.Occurrences.AddByFilename(file)/ J$ X2 A% c7 Z' u
set objFace=objPart.SubOccurrences(1).SubOccurrenceDocument.Models(1).ExtrudedCutouts(1).SideFaces(1)+ g: P. q4 X2 o3 N0 g6 j, c; D
Set objRef=objDoc.CreateReference(objPart,objFace)
( [) C0 ^* F( P2 h  X) a" E: m但是运行的时候objRef的结果为Nothing这是怎么回事呢
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表