GefArcFormat (object)

Represents the attributes of an arc object.

Description:

The GefArcFormat object represents the attributes of an arc object. If the GefObject does not have an ArcFormat property then Nothing is returned.

Example:

Sub GefObject_ArcFormat()

Dim oCimObj As GefObject

    Dim oCimArcFmt As
GefArcFormat

Set oCimObj = CimGetObject

    Set oCimArcFmt =
oCimObj.ArcFormat

    If oCimArcFmt Is Nothing
Then

        MsgBox "The
current object is not an arc"

Else

        MsgBox "The
current object is an arc"

End If

End Sub

Properties:

Application , Direction , EndAngle , Parent , StartAngle , Style

Methods: