GefButtonFormat (object)

Represents the attributes of a button object.

Description:

The GefButtonFormat object represents the attributes of a button object. If the GefObject does not have an ButtonFormat property then Nothing is returned.

Example:

Sub GefObject_ButtonFormat()

Dim oCimObj As GefObject

    Dim oCimBtnFmt As
GefButtonFormat

Set oCimObj = CimGetObject

    Set oCimBtnFmt =
oCimObj.ButtonFormat

    If oCimBtnFmt Is Nothing
Then

        MsgBox "This
object is not a push button"

Else

        MsgBox "This
object is a push button"

End If

End Sub

Properties:

Application , AutoSize , ColorAnimate , FaceColor , Parent , State

Methods: