Yes

All controls that use a "ListImage" work like that.

ToolBar, ListView etc..

Example code snippet I wrote

Code:
Private Function ModeleActif() As Boolean
    ModeleActif = (Toolbar1.Buttons(KEY_CONFIG).Image = "LOCK_GO" And Len(iniModele.IniFileName) > 0)
End Function

Private Sub ActiveModele(Name As String)
    iniModele.IniFileName = Name

    With Toolbar1.Buttons(KEY_CONFIG)

        If Len(Name) Then
            .Image = "LOCK_GO"
        Else
            .Image = "LOCK_OPEN"
        End If

    End With

    SetMainCaption
End Sub
For cons, I have a question:
I saw in the TwNode class (and elsewhere)

Code:
Public Property Get NextSibling() As TvwNode
Set NextSibling = ShadowTreeView.FNodeNextSibling(PropHandle)
End Property

Public Property Set NextSibling(ByVal Value As TvwNode)   ' Why???
Err.Raise Number:=383, Description:="Property is read-only"
End Property
Why was the Property Set ?
If one does put THAT Property Get," then the property IS Read-only


Thank you to enlighten me.


best regards