表格有三列，分别是产品编号、产品类别和订单号，同一个订单号对应多个产品编号。现在做一个查询窗口，设置查询结果为分页加载，可以按照不同的字段升降序排序，按照帮助里面尽量以不重复值的列或者主键列为分页列，如果loadover=产品编号，结果是准确的，但是现在想灵活加载排序，但是设置loadover= 产品类别或者订单号，结果出现错误，会少一些记录没有显示，如何改进。
查询按钮代码如下：
Dim pxzd As WinForm.ComboBox = e.Form.Controls("ComboBox排序字段")
Dim px As WinForm.ComboBox = e.Form.Controls("ComboBox排序")
With dt
.LoadFilter = ""
.LoadTop = e.Form.Controls("TextBox每页记录数").value '每页行数
.LoadPage = 0 '加载第一页
.LoadOver = pxzd.value
If px.value = "升序" Then
.LoadReverse = False
Else If px.value = "降序" Then
.LoadReverse = True
End If
.Load()
下页按钮的代码如下：
With dt
If .LoadPage < .TotalPages - 1
.LoadPage = .LoadPage + 1
.Load()
End If
End With
[此贴子已经被作者于2018/6/18 20:37:52编辑过]
加好友 
发短信
Post By：2018/6/18 0:04:00 [只看该作者]
