GefObject.Line (read-only property)

Gets the GefLineFormat for the object.

Syntax:

Description:

The line is the border portion of the object. Returns Nothing if this property is not valid for the object.

Example:

Sub GefObject_Line()

Dim oCimobj As GefObject

    Dim oCimLineFmt As
GefLineFormat

Set oCimobj = CimGetObject

    Set oCimLineFmt =
oCimobj.Line

    If oCimLineFmt Is Nothing
Then

        MsgBox "The
objects does not support border lines"

Else

        MsgBox "The
objects does support border lines"

End If

End Sub

Gets the GefLineFormat for the object.
Syntax:	Set GefLineFormat = object.Line
Description:	The line is the border portion of the object. Returns Nothing if this property is not valid for the object. Example: `Sub GefObject_Line()` `Dim oCimobj As GefObject` `Dim oCimLineFmt As GefLineFormat` `Set oCimobj = CimGetObject` `Set oCimLineFmt = oCimobj.Line` `If oCimLineFmt Is Nothing Then` `MsgBox "The objects does not support border lines"` `Else` `MsgBox "The objects does support border lines"` `End If` `End Sub`