各路高手，在下初学VB,想问个弱智问题，如何动态删除数据库中的表（表中有记录），送高分喽！！

Question

什么叫动态删除，请说明白：－）你用sql语句查处记录，然后删除就可以了改变sql语句

Answer 1

drop table   表名自己看一下sql的书

Answer 2

Dim DataBase As DataBase
Set DataBase = OpenDatabase("database.mdb")
'删除表
DataBase.TableDefs.Delete "tablename"
'改表名
DataBase.TableDefs("oldname").Name = "newname"

Answer 3

对不起大家，我可能没有说明白，我的意思是
我已经在程序中创建了一个表，表中有记录，用DataBase.TableDefs.Delete "tablename"的方法来删除，可怎么也删除不掉，急死了，空表就可以删除掉。怎么会事呀？

Answer 4

用DataBase.TableDefs.Delete "tablename"能否删除有记录的表，我试了几次，
职能删除空表，为什么？

Answer 5

Dim db As DAO.Database
Dim tdf As DAO.TableDef
For i = 0 To db.TableDefs.Count - 1
    If LCase(db.TableDefs(i).Name) = "表名" Then
        db.TableDefs(i).Name = ""
    End If
next i
‘没有测试，请自己试试

Answer 6

Public SqlCommand As New ADODB.Command     '定义 SQL 命令
    SqlCommand.ActiveConnection = adoCN
    SqlCommand.CommandType = adCmdText
    SqlCommand.CommandText = "drop table "
    SqlCommand.Execute

Answer 7

用ADOX，你去查查msdn关于ADOX的资料就知道了