主题：分页加载和排序

我希望排序后，然后分页，代码和效果如下：

不是我想要的排序效果，何解？？？

此主题相关图片如下：无标题.jpg

        With DataTables("订单")
            .LoadFilter = str1
            .loadorder = str2
            If Vars("_Paging") = True Then
                .LoadTop = 1000
                .LoadPage = 0
                lngTotalPages  = .TotalPages  
                  
            End If           
            .Load()
        End With