插入新记录后如何重新排序记录，VBA，MS ACCESS答案

【问题标题】：How to re-order records after insert of a new record, VBA, MS ACCESS插入新记录后如何重新排序记录，VBA，MS ACCESS
【发布时间】：2013-03-14 10:05:54
【问题描述】：

我目前有一个表单，它按每条记录的递增数字的降序显示记录。虽然在我插入一条新记录后，记录顺序是这样的：

4, 3, 2, 1, 5

但我需要它在插入后看起来像这样：

5, 4, 3, 2, 1

我有以下代码，onLoad 对问题进行排序，但我想在输入新记录后对记录进行排序。

Me.OrderBy = "Table1.Field1 DESC"
Me.OrderByOn = True

有什么想法吗？

【问题讨论】：

标签： ms-access vba

【解决方案1】：

您可以重新查询：

Private Sub Form_AfterInsert()
    Me.Requery
End Sub

【讨论】：

我的问题是我在 AfterInsert 事件中有其他代码，这导致了问题，我将代码移到了 BeforeInsert 中，只有 me.requery 和 BOOM！