適用先: Access 2013、Office 2013
データベースから既存のテーブル、プロシージャ、またはビューを削除するか、テーブルから既存のインデックスを削除します。
注:
[!メモ] Microsoft Access データベース エンジンは、Microsoft Access データベース エンジン以外のデータベースでは DROP 句や DDL (データ定義言語) ステートメントを使用できません。 Microsoft Access データベース エンジン以外のデータベースでは、代わりに DAO の Delete 系メソッドを使用してください。
構文
DROP {TABLE table | INDEX index ON table | PROCEDURE procedure | VIEW view}
DROP ステートメントには、次の指定項目があります。
パーツ |
説明 |
---|---|
table |
削除されるテーブル、またはインデックスが削除されるテーブルの名前です。 |
procedure |
削除されるプロシージャの名前です。 |
view |
削除されるビューの名前です。 |
index |
テーブルから削除されるインデックスの名前です。 |
注釈
テーブルを削除したり、テーブルからインデックスを削除したりするには、テーブルを閉じる必要があります。
ALTER TABLE ステートメントを使用してもテーブルからインデックスを削除できます。
CREATE TABLE を使用してテーブルを作成し、CREATE INDEX または ALTER TABLE を使用してインデックスを作成できます。 テーブルを変更するには、ALTER TABLE を使用します。
例
次の使用例では、Northwind データベースの Employees テーブルに架空の NewIndex インデックスが存在していることを前提としています。
次の使用例では、MyIndex インデックスを Employees テーブルから削除します。
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