对表里记录进行排序

排序的问题是很简单！

代码中写入类似如下内容， 具体情况看你的表的字段名称。

Private Sub cmd排序()
    Me.OrderByOn = True
    Me.OrderBy = "[字段名]"        '     Me.OrderBy = "[字段名] DESC"        ' 降幂排序
'''    Me.OrderBy = "[用户姓名] DESC,[上机日期] DESC,[上机时间] DESC"  '' 也可以多字段排序，位置任意！
''' 过程的调用也是任意的 ， 随用户意愿！

End Sub

我建议你将上述字段 （ “B1-123-A1”） 的字段改为2个或三个字段， 是情况而定！

这样排序操作方便一些。