主题：追载本表

我在系统菜单上新建了一个标准按钮，名字叫做“追载本表”，如果点击此按钮，就追载当前表。那么，按钮里面的代码应该如何写呢？谢谢。

我是要追加，即要追我登陆系统之后别人才新加入的数据行。

Dim id As Integer = DataTables("表A").Compute("Max(_Identify)")
Dim Filter As String = "[_Identify] > " & id
DataTables("表A").AppendLoad(Filter, False)

谢谢。