2.36.12 Type

Description

An Integer value represent the page type

Syntax

VB: Property Get Type As Integer

C++: int Type

C#: int Type

Remark

Examples

VB

    Sub Type()
        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 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 active page is a " + sType)
    End Sub

Version Information

8.0SR2

See Also