   Else
         pbIsGreater = (lR &lt;= 0)
      End If
    
   Case CCLSortFontIndex
      lR = vSortItem.iFntIndex - vItem.iFntIndex
      bIsEqual = (lR = 0)
      If (m_tSort(iSortIndex).SortOrder = CCLOrderAscending) Then
         pbIsGreater = (lR &gt;= 0)
      Else
         pbIsGreater = (lR &lt;= 0)
      End If
    
   Case CCLSortIndentation
      lR = vSortItem.lIndent - vItem.lIndent
      bIsEqual = (lR = 0)
      If (m_tSort(iSortIndex).SortOrder = CCLOrderAscending) Then
         pbIsGreate