GefObject.ImageFormat (read-only property)

Gets the GefImageFormat for the object.
Syntax: Set GefImageFormat = object.ImageFormat
Description: The GefImageFormat object represents the attributes of Image Object.


Sub GefObject_ImageFormat()
    Dim oCimObj As GefObject
    Dim oCimImageFormat As GefImageFormat
    Set oCimObj = CimGetObject
    Set oCimImageFormat = oCimObj.ImageFormat
    If oCimImageFormat Is Nothing Then
        MsgBox "This object is not Image object"
        MsgBox "This object is Image Object"
    End If
End Sub