2.35.6 Layers

Description

The collection of layers(sheets) in current page

Syntax

VB: Property Get Layers As Layers

C++: Layers Layers

C#: Layers Layers

Remark

Examples

VB

    Sub Layers()
        Dim app As Origin.IOApplication
        Dim pg As Origin.Page

        app = New Origin.ApplicationSI
        pg = app.ActivePage
        If pg Is Nothing Then
            MsgBox("Can not get active page")
            Exit Sub
        End If
        Dim nCount As Integer
        nCount = pg.Layers.Count
        MsgBox("The active page has " + nCount.ToString() + " layers")
    End Sub

Version Information

8.0SR2

See Also