MSFlexGrid.Col = 0  '以第一行为基准排序
MSFlexGrid.Sort = 1

解决方案 »

  1.   

    Compare 事件
          当 MSHFlexGrid 的 Sort 属性被设置为 Custom Sort (9) 时发生,因此用户可以自定义排序进程。语法Private Sub object_Compare(row1, row2, cmp)Compare 事件的语法包含如下部分:部分 描述 
    object 一个对象表达式,其值为“应用于”列表中的一个对象。 
    row1 一个 Long整数,它指定正在比较的一对行的第一行。 
    row2 一个 Long整数,它指定正在比较的一对行的第二行。 
    cmp 一个整数,它表示每一对的排序次序。如设置值中所述。 
    设置值事件句柄必须比较 row1 和 row2,并把 cmp 设置为:设置值 描述 
    –1 如果 row1 应该显示在 row2 前面 
    0 如果两行相等或任一行都可以显示在另一行之前。 
    1 如果 row1 应该显示在 row2 之后。 
    说明当 Sort 属性被设置为 9 (自定义排序)时,Compare 事件对 MSHFlexGrid 中的每一对行发生一次。因为 Compare 事件使用行号代替了文本值,可以对那一行比较任何属性值,包括 RowData。注意 虽然自定义排序比内置的排序慢,但它们提供了使用任何列或使用任何单元属性排序一行的灵活性。