Sort

1、IQueryFilterDefinition
  Set pQueryFilter = New QueryFilter
  pQueryFilter.WhereClause = "ForObsData=" & IIf(bIsForObsData, "1", "0") & " And UserDefine=1"
  Dim pQueryFilterDefinition As IQueryFilterDefinition
  Set pQueryFilterDefinition = pQueryFilter
  pQueryFilterDefinition.PostfixClause = "ORDER BY PowerValue Desc"
2、ITableSort
  Dim pTableSort As ITableSort
  Set pTableSort = New esriGeoDatabase.TableSort
  pTableSort.Fields = "PowerValue"
  pTableSort.Ascending("PowerValue") = False
  pTableSort.CaseSensitive("PowerValue") = True
  Set pTableSort.QueryFilter = pQueryFilter
  Set pTableSort.Table = pTable
  pTableSort.Sort Nothing