  PropertyChanged "IconSizeX"
End Property
Public Property Get IconSizeY() As Long
Attribute IconSizeY.VB_Description = "Gets/sets the height of the images in the
 list.  Has no effect at runtime unless you call the Create method."
   ' Returns the icon height:
    IconSizeY = m_lIconSizeY
End Property
Public Property Let IconSizeY(ByVal lSizeY As Long)
   ' Sets the icon height.  NB no change at runtime unless you
   ' call Create and add all the images in again.
    m_lIconSizeY = lSizeY
    PropertyChang