前面小编发表过关于设置排序顺序的方法。
这里又有新的办法通过组合框指定主要关键字和次要关键字来设置多个字段排序显示数据
Dim rs As New ADODB.Recordset
rs.Open "员工工资", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
rs.Sort = txt主关键字 & " desc," & txt次关键字 '根据输入的关键字排序
Set Me.Recordset = rs '将排序后的记录集重新添加到窗口
Me.Requery
rs.Close
Set rs = Nothing
排序结果: