切换表数量不同的数据源 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师下面是我切换不同数据源的代码，先卸载表，然后再装载新数据源的表。但是因为新旧数据源中表的个数不同，会报错提提示新数据源中不存在的表无法加载，我该如何处理可以正常加载新数据源中的表

举例：旧数据源中有表A、表B、表C,新数据源中只有表A、表B

Dim s As String ="" '遍历当前属于此数据源的表

For Each ds As DataTable In DataTables

If ds.C Then

s += "|" & ds.name

End If

s = s.Trim("|")

'卸载表

DataTables.Unload(s)

Connections.Delete("wbsy")

Connections.add("wbsy", r("pcip"))

DataTables.load(s)

主题：切换表数量不同的数据源