2.38.3 Item


Description

Specify a page in the current project

Syntax

VB: Property Get Item(Index As ByVal Object ) As Page
C++: Page Item(_variant_t Index )
C#: Page Item(var Index )

Parameters

Index
--

Remark

Examples

VB

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

        app = New Origin.ApplicationSI
        pg = app.Pages.Item(0) ' get the first page

        Dim nType As Integer
        nType = pg.Type
        Dim sType As String
        If nType = Origin.PAGETYPES.OPT_GRAPH Then
            sType = "GraphPage"""
        ElseIf nType = Origin.PAGETYPES.OPT_MATRIX Then
            sType = "MatrixPage"
        ElseIf nType = Origin.PAGETYPES.OPT_WORKSHEET Then
            sType = "WorksheetPage"
        Else
            sType = "Origin Page"
        End If
        MsgBox("The first page in this project is a " + sType)
    End Sub

Version Information

8.0SR2

See Also