|   |   | Object Model Reference : Classes : B : Bitmap : Properties : Bitmap.Mode | 
Property Mode As cdrImageType
Member of Bitmap
The Mode property returns the color mode of the bitmap.
The Mode property returns a read-only value.
The following VBA example displays the number of bitmaps in the RGB color mode.
| Sub Test() | 
|  Dim s As Shape, n As Long | 
|  n = 0 | 
|  For Each s In ActivePage.Shapes | 
|   If s.Type = cdrBitmapShape Then | 
|    If s.Bitmap.Mode = cdrRGBColorImage Then n = n + 1 | 
|   End If | 
|  Next s | 
|  MsgBox "There are " & n & " RGB bitmaps." | 
| End Sub | 
|   |   |   | 
Copyright 2013 Corel Corporation. All rights reserved.