Office中国论坛/Access中国论坛

标题: 排序问题的请教 [打印本页]

作者: 简 时间: 2012-1-14 07:03
标题: 排序问题的请教
我的子窗体排序代码如下：

Me.sub1.Form.OrderBy = "工厂,外协单位,产品代号,发件日期,卡号": Me.sub1.Form.OrderByOn = True

我认为，代码Me.sub1.Form.OrderBy = "工厂,外协单位,产品代号,发件日期,卡号"中每个字段都是按升序排列的，我的问题是:

1）如果全部都降序排列，代码该如何修改呢？
2）如果我要求工厂，外协单位，产品代号是升序排列，然后发件日期是降序排列，卡号随意，其代码又该如何修改呢？

作者: Henry D. Sy 时间: 2012-1-14 09:37
降序：
desc

作者: roych 时间: 2012-1-14 09:57
建议在查询源里进行排序。

作者: 简 时间: 2012-1-14 13:18

roych 发表于 2012-1-14 09:57
建议在查询源里进行排序。

我排序的方式并不固定，换句话说就是动态排序，随时都可能变化排序的方式，如果在查询源里排序，那样要做很多个查询，我不想这样做。

作者: roych 时间: 2012-1-14 21:06
其实不必使用多个查询的，用SQL随时指定查询源即可（前提是已经存在该查询了），例如：

Sub test()
Dim qry As QueryDef
Set qry = CurrentDb.QueryDefs("dd")
'在这里修改Order部分。
qry.SQL = "select * from Tbl_Test Order By [Order]"
End Sub

复制代码

作者: 简 时间: 2012-1-14 21:35

roych 发表于 2012-1-14 21:06
其实不必使用多个查询的，用SQL随时指定查询源即可（前提是已经存在该查询了），例如：

这也是个方法，谢谢roych版主。
折腾了一下午，我总算解决了。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)