Model にグループを作成して、新しい Group にオブジェクトを追加します。

Group Model.AddGroup( Object in_pMembers, String in_bszName, Boolean in_bBranchMember );

oReturn = Model.AddGroup( [Members], [Name], [BranchMember] );

Group

パラメータ	タイプ	説明
Members	X3DObjectCollectionまたはSceneItem	新しいグループに追加するメンバ
Name	String	新しいグループの名前
BranchMember	Boolean	新しいメンバをブランチメンバとして追加する場合は True デフォルト値: False

VBScript の例

'

' This example demonstrates how to create a new sub model 

' under the scene root and add all the 3dobjects that are 

' under the scene root to this new model

'

NewScene , false

ActiveSceneRoot.AddModel ActiveSceneRoot.Children, "Sherman"