このジオメトリの各SegmentオブジェクトのSegmentCollectionを戻します。ポリゴンメッシュセグメントはEdgeオブジェクトです。
set oRoot = Application.ActiveProject.ActiveScene.Root set oObj = oRoot.AddGeometry( "Cube", "MeshSurface" ) set oGeometry = oObj.ActivePrimitive.Geometry set oSegments = oGeometry.Segments |