## ModelCollection

### Introduced

v1.5

### Description

A collection of Model objects that represent the models within a Model. The Model object is a member of the Scene object. This collection is 0-based.

### Methods

Filter | Find | GetAsText |

### Properties

Count | Item |  |

### Examples

#### VBScript Example

    'VBScript example

    option explicit

    Main()

    sub main()

    	dim oRoot

    	set oRoot = ActiveProject.ActiveScene.Root

    	oRoot.AddModel( oRoot.Children )

    	call WriteModels(oRoot)

    end sub

    function WriteModels( in_obj )

    	dim list, n, i, models

    	set models = in_obj.models(0)

    	n = models.count

    	if n = 0 then

    		exit function

    	end if

    	for i = 0 to n - 1

    		LogMessage models(i).Name

    		call WriteModels( models(i) )

    	next

    end function

### See Also

X3DObject.Models