|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
Sub main(); `$ T& Q9 m% Y q b
5 p4 c4 `( v& e% jSet swApp = Application.SldWorks
* R- x+ F9 ?4 r. M8 q
# O2 _: I& \) i5 hSet Part = swApp.ActiveDoc
) ^6 \$ f5 |9 D/ H; X" tboolstatus = Part.Extension.SelectByID2("右视基准面", "PLANE", 0, 0, 0, False, 0, Nothing, 0)- X3 D% }4 z% M2 k( I
Part.ClearSelection2 True9 R9 r3 s4 E# Q1 [9 Y3 {) U8 y# @
Dim skSegment As Object. ], H7 d6 [1 d: y% W3 b
Set skSegment = Part.SketchManager.CreateCircle(0#, 0#, 0#, 0.01, 0, 0#)% q' {0 J& M# \$ e- J
Part.ClearSelection2 True
9 P8 `* b5 q$ M& cPart.SketchManager.InsertSketch True a" d$ K4 ^/ W2 D9 P% s
End Sub5 |2 z- c* W6 j. i
为什么代码中选择了右视基准面，执行宏之后画出的圆依然在前视基准面上，如果要画在右视基准面上应该怎样写源代码 |
|
发表于 2011-4-30 15:48:53
楼主