onTreeIconSets
Attribute IconSet.VB_Description = "Gets/sets whether to use Win98 or 3D style
 icons for the check boxes and option boxes."
    IconSet = m_eIconSet
End Property
Public Property Let IconSet(ByVal eSet As OptionTreeIconSets)
Dim sPf As String
Dim i As Long
Dim sI As String
Dim iLen As Long
    m_eIconSet = eSet
    sPf = Postfix()
    For i = 1 To tvwOpt.Nodes.Count
        With tvwOpt.Nodes(i)
            sI = Left$(.Image, 6)
            If (sI = "OPTION") Or (sI = "CHECK_") Then
          