本帖最后由 gyhk02 于 2013-2-21 11:51 编辑
Jessesn, 以下为我在本网站找到你写的代码,想请教一个问题
比如,之前有选择了5条曲线生成5个圆管后,我想回头再来选中第2条圆管要怎样才能实现?能否帮我写个简短的代码,谢了!!!
Dim crvs, crv, rad
crvs = Rhino.getobjects("Select curves to create pipes around", 4) ' 4 = curves
rad = CStr(Rhino.GetReal("Type radius for pipes", 1, 0.001))
For Each crv In crvs
Rhino.UnselectAllObjects
Rhino.Command "_pipe _selid " + crv + " " + rad + " _enter _enter"
Next
|