v3.0
SegmentのこのコレクションからSubComponentを作成します。
set oCube = ActiveSceneRoot.AddGeometry("Cube","MeshSurface")
set oSegment = oCube.ActivePrimitive.Geometry.Segments(2)
set oSubComponent = oSegment.SubComponent
oSubComponent.AddElement 3
SelectObj oSubComponent
|