このジオメトリの各Sampleオブジェクトを含むSampleCollectionを戻します。
注：このプロパティは IDispatch オブジェクトではなくSampleCollectionを戻します。つまり、Geometry
メソッドとプロパティへのアクセスが可能になるのではなく、Sampleオブジェクトで使用できるメソッドとプロパティにのみアクセスできます。
set oCube = ActiveSceneRoot.AddGeometry("Cube","MeshSurface")
set oSamples = oCube.ActivePrimitive.Geometry.Samples
Application.LogMessage "There's " & oSamples.Count &" sample in this geometry"
|