GefObject.FrameFormat (read-only property)

Gets the GefFrameFormat for the object.

Syntax:

Set GefFrameFormat = object.FrameFormat

Description:

This property is only valid for frame (not frame container) objects. Returns Nothing if this property is not valid for the object.

Example:

Sub GefObject_FrameFormat()

Dim oCimObj As GefObject

    Dim oCimFrameFmt As
GefFrameFormat

    Dim oCimfrmObj As
GefObject

    Dim oCimFrmContFmt As
GefFrameContainerFormat

    Dim oCimFrameObj As
GefObject

Set oCimObj = CimGetObject

    Set oCimFrmContFmt =
oCimObj.FrameContainerFormat

    If Not oCimFrmContFmt Is Nothing
Then

        Set
oCimFrameObj = oCimFrmContFmt.CurrentFrame

        Set
oCimFrameFmt = oCimFrameObj.FrameFormat

        If Not
oCimFrameFmt Is Nothing Then

            MsgBox
"The frame expression for the current " & _

                "frame
is " & oCimFrameFmt.FrameExpression

        End
If

Else

        MsgBox "The
object is not a frame within a frame container"

End If

End Sub