求助：项目关闭前删除不需要的表，总出错！ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

BeforeCloseProject 关闭项目之前执行事件代码：

‘想要实现的目的：关闭项目前，如果不是表A,表B,表C,表D，则全部删除！！

代码如下：

If DataTables.Count > 4 Then

Dim Builder As New ADOXBuilder

Builder.Open()

With Builder

Dim tbs As String = "表A,表B,表C,表D"

For Each t As Table In Tables

Dim name = t.Name

If tbs.Contains(name) = False Then

.DeleteTable(name)

End If

End With

Builder.Close()

End If

但会经常性地出现以下错误信息！！

此主题相关图片如下：222.jpg

主题：求助：项目关闭前删除不需要的表，总出错！