_
    ) As Integer
    SortColumn = m_iSortColumn(iSortIndex)
End Property
Property Let SortOrder( _
        ByVal iSortIndex As Integer, _
        ByVal iSortOrder As cShellSortOrderCOnstants _
    )
Attribute SortOrder.VB_Description = "Gets/sets the order to sort in for a
 specified sort column.  Up to three columns can be specified for a sort."
    If (pbValidSortIndex(iSortIndex)) Then
        m_eSortOrder(iSortIndex) = iSortOrder
    End If
End Property
Property Get SortOrder( _
        ByVal iSortInd