删除表,参考代码
If DataTables.Contains("表A") Then Dim Builder As New ADOXBuilder Builder.Open() With Builder .DeleteTable("表A") End With Builder.Close() DataTables.Unload("表A")End If
http://www.foxtable.com/webhelp/scr/2122.htm