多用户操作时如何避免输入重复值 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

SystemReady = False

Try

Dim mg As New Merger

mg.SourcePath = "\\Pc-20150115kkfz\电脑系统\Foxtable\数据库文件\Prodtest.mdb"

mg.SourceTableName = "出入库2"

mg.DataTableName = "出入库2"

mg.Merge()

Catch ex As Exception

MessageBox.Show("追加数据失败")

End Try

SystemReady = True

我用上面的代码可以导入数据了。但是，像 "出入库2" 这样的数据表有大约90个，要一个一个数据表去改名，然后再导入，也是停麻烦的。请帮我改一下代码，按一次按钮就可以将所有数据表导入行吗？谢谢。

主题：多用户操作时如何避免输入重复值