10个按钮和1个按钮的用法没有区别，改改查询的SQL即可
按钮1
cmd.CommandText = "Select * From (Select Row_Number() Over(Order by 订单.订单编号 desc ) As RowNum,订单.订单编号,日期,客户,Sum(数量) As 数量,sum(数量*单价) As 金额"
cmd.CommandText = cmd.CommandText & " From 订单 Left JOIN 订单明细 ON 订单明细.订单编号 = 订单.订单编号 Group By {订单}.订单编号,日期,客户) As a "
cmd.CommandText = cmd.CommandText & " Where RowNum >= " & 1 & " And RowNum <= " & 10
Dim dt As DataTable = cmd.ExecuteReader
按钮2
cmd.CommandText = "Select * From (Select Row_Number() Over(Order by 订单.订单编号 desc ) As RowNum,订单.订单编号,日期,客户,Sum(数量) As 数量,sum(数量*单价) As 金额"
cmd.CommandText = cmd.CommandText & " From 订单 Left JOIN 订单明细 ON 订单明细.订单编号 = 订单.订单编号 Group By {订单}.订单编号,日期,客户) As a "
cmd.CommandText = cmd.CommandText & " Where RowNum >= " & 11 & " And RowNum <= " & 20
Dim dt As DataTable = cmd.ExecuteReader
加好友 
发短信
Post By：2019/9/28 9:10:00 [只看该作者]
