GefPolylineFormat.Closed (property)

Gets and sets whether or not the line object is closed.
Syntax: GefTriStateEnum = object.Closed
object.Closed = GefTriStateEnum
Description: Only line (gefLine) objects support this property. If the line is closed a line segment is drawn between the starting and ending vertices of the line object.

If the object does not support this property the return value is undefined.


Sub PolylineFormat_Closed()
    Dim oCimObj As GefObject
    Dim oCimPolyFmt As GefPolylineFormat
    Set oCimObj = CimGetObject
    Set oCimPolyFmt = oCimObj.PolylineFormat
    If Not oCimPolyFmt Is Nothing Then
        Select Case oCimObj.PolylineFormat.Closed
            Case gefStateFalse
                MsgBox "The polyLine is not closed"
            Case gefStateMixed
                MsgBox "The ployline is in an unknown state " & _
                    "or is not set"
            Case gefStateTrue
                MsgBox "The polyline object is closed"
        End Select
    End If
End Sub