在2017版本中，建议排序菜单调整以下内容：

1、菜单上升序和降序的箭头应该相反；

2、菜单上箭头的方向应该与排序字段上箭头方向一致；

3、多字段排序时，只要箭头存在，排序的作用就应该有效；

4、多选排序字段的顺序应该与字段的左右顺序一致；

5、排序中的取消菜单，应该只取消一个字段。

这个排序功能自己做吧，beforeSort写代码

If e.sort > "" AndAlso e.sort.split(",").length = 1 Then
    Dim nsort As String = ""
    Dim flag As Boolean = False
        For Each s As String In e.Table.sort.split(",")
            Dim ary() As String = s.Split(" ")
            If e.sort.contains(ary(0)) = False Then
                nsort &= "," & ary(0)
            Else
                flag = True
                nsort &= "," & e.sort
            End If
        Next
    If flag = False Then
        nsort &= "," & e.sort
    End If
    e.sort = nsort.trim(",")
End If