## 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