呵呵,别听老六的,既然知道表名称,删除根本就不是问题。
Dim Builder As New ADOXBuilderBuilder.Open()With Builder .DeleteTable("要删除表的表名")End WithBuilder.Close()