Gets the GefImageFormat for the object. | |
Syntax: | Set GefImageFormat = object.ImageFormat |
Description: | The GefImageFormat object represents the
attributes of Image Object. Example: 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" Else MsgBox "This
object is Image Object" End If End Sub |