通过

DROP 语句 (Microsoft Access SQL)

  • 项目

适用于：Access 2013、Office 2013

从数据库中删除现有表、过程或视图，或从表中删除现有索引。

注意

[!注释] Microsoft Access 数据库引擎不支持将 DROP 或任何 DDL 语句用于非 Microsoft Access 数据库引擎数据库。 可以改用 Delete 方法。

语法

DROP {TABLE table | INDEX index ON table | PROCEDURE procedure | VIEW view}

DROP 语句包含以下部分：

Part

说明

table

要删除的表或要从中删除索引的表的名称。

procedure

要删除的过程的名称。

view

要删除的视图的名称。

index

要从表中删除的索引的名称。

说明

必须先关闭表才可删除该表或从其中删除索引。

还可以使用 ALTER TABLE 语句从表中删除索引。

可以使用 CREATE TABLE 创建一个表，用 CREATE INDEX 或者 ALTER TABLE 语句创建一个索引。 若要对表进行修改，请使用 ALTER TABLE 语句。

示例

以下示例假定 Northwind 数据库的 Employees 表中存在一个假想的 NewIndex 索引。

以下示例从 Employees 表中删除 MyIndex 索引。

    Sub DropX1() 
     
        Dim dbs As Database 
     
        ' Modify this line to include the path to Northwind 
        ' on your computer. 
        Set dbs = OpenDatabase("Northwind.mdb") 
     
        ' Delete NewIndex from the Employees table. 
        dbs.Execute "DROP INDEX NewIndex ON Employees;" 
     
        dbs.Close 
     
    End Sub

以下示例从数据库中删除 Employees 表。

    Sub DropX2() 
     
        Dim dbs As Database 
     
        ' Modify this line to include the path to Northwind 
        ' on your computer. 
        Set dbs = OpenDatabase("Northwind.mdb") 
     
        ' Delete the Employees table. 
        dbs.Execute "DROP TABLE Employees;" 
     
        dbs.Close 
     
    End Sub