主题：动态卸载表后数据记录丢失问题已经解决，感谢各位关注，也请多多留意注意事项！

将卸载表的按钮改为：

DataTables("表A").Save()

DataTables.unload("表A")

这个和加载和卸载没有关系的。

另，新增行不存在Load，你要保存新增行的话，应该dr.Save()

Load是从后台提取数据，新增行不存在后台数据，没有必要Load的，以前也是这样的。

不存在频繁DataTables(“xxx”).Save啊？

你可以：dr.Save()

例如：

MainTable = Tables("表A")
Dim dr As DataRow
For i As Integer = 0 To 10
    dr = DataTables("表A").AddNew()
    dr("第一列") = format(DataTables("表A").DataRows.Count + i,"00000")
    dr.Save()
Next

当然如果增加的行很多，这样还不如最后统一保存高效：

MainTable = Tables("表A")
Dim dr As DataRow
For i As Integer = 0 To 1000
    dr = DataTables("表A").AddNew()
    dr("第一列") = format(DataTables("表A").DataRows.Count + i,"00000")
Next
DataTables("表A").Sve()

前面解释这么多，为什么就不明白呢？

dr.load对于新增行无效，load是从后台加载数据，新增行在后台并不存在，load什么啊？

而且从代码的角度来说：

dr.Save()

dr.Load()

远远好过：

dr.Load(True)

因为前者清晰明了，任何人一看就明白。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目47.foxdb

呵呵：

1、外部表本来就是默认加载10行的

2、这个是编码逻辑问题，需要老程你自己考虑。

3、dr.load本来就对新增行无效的，一直如此呢，还是SAVE和Load分开吧，不过新增行Load有意义吗？

好，我搞成load(True)对新增行执行的时候，保存一下，而不是什么都不做