当完成或者取消一个查询时,产生此事件。
Private Sub QueryTable_AfterRefresh(Success As Boolean)
Success 如果查询成功完成,则为 True。
本示例使用 Success 参数判断查询是否成功完成。
Private Sub QueryTable_AfterRefresh(Success As Boolean)
    If Success
        ' Query completed successfully
    Else
        ' Query failed or was cancelled
    End If
End Sub