cture( _
        ByVal eType As OptionTreeCheckTypes _
    ) As StdPicture
Dim vKey As Variant
    Select Case eType
    Case OptionTreeCheckPartial
        vKey = "CHECK_PART" &amp; Postfix()
    Case OptionTreeCheckNone
        vKey = "CHECK_NO" &amp; Postfix()
    Case OptionTreeCheckFull
        vKey = "CHECK_YES" &amp; Postfix()
    End Select
    Set CheckPicture = ilsIcons.ListImages(vKey).Picture
End Property
Property Get Indentation() As Double
Attribute Indentation.VB_Description = "Gets/sets the 