照着帮助文档写有什么问题?删除表直接写
Dim Builder As New ADOXBuilderBuilder.Open()With Builder .DeleteTable(CurrentTable.name)End WithBuilder.Close()DataTables.Unload(CurrentTable.name)
http://www.foxtable.com/webhelp/scr/2122.htm