ms-access - MS ACCESS---全部通过VBA刷新

Question

如何通过 vba 刷新所有内容？
我想刷新所有打开的表格...

Answer 1

@CodeSlave 的答案可能没有满足您的需要，原因是您需要的 VBA 方法是重新查询，而不是刷新。刷新将显示对现有记录所做的更改，但只有重新查询才会显示新添加的记录。

这是代码的更简洁版本(将其放在模块中，以便您可以从任何形式调用它):

Public Sub RequeryOpenForms()
    Dim f as Form

    For Each f In Access.Forms
        f.Requery
    Next
End Sub

注意:不幸的是，重新查询具有丢失当前选定记录的副作用。如果有很长的记录列表，这对于使用来说尤其令人沮丧，因为他们可能必须向下滚动很长一段路才能找到他们以前查看的记录。