使用SQLDDL创建、删除表和关系

若要建立一个字段Id为自动编号数据类型的主键，字段MyText的文本数据类型长度为10的表，可以在查询的数据定义查询窗口中输入以下语句:

注意:在以下查询示例中，每行末尾的下划线(_)用于延续该行。创建查询时，移除。

创建表Table1 (Id计数器约束PrimaryKey主键，_
MyText TEXT (10))

通过运行以下不带PrimaryKey的查询语句，可以在关系的另一端创建外键。该查询创建了一个具有长整型字段Id和文本类型字段MyText(默认长度为255)的表。

创建表格Table2 (Id LONG，MyText TEXT)

创建这两个表后，在Table1和Table2之间运行以下查询，以创建一对多关系，其中Table1是关系的主方。

ALTER TABLE Table2添加约束关系1外键([Id]) _
引用表1 ([Id])

若要删除这两个表之间的关系，可以使用以下查询:

更改表Table2删除约束关系1

若要删除表Table1，可以运行以下查询:

删除表表1

若要删除表Table2，可以运行以下查询:

删除表表2

除了通过查询运行这些语句名之外，还可以在RunSQL中以代码的形式运行DDL语句，或者可以通过下面的过程模拟它们。

sub execute sqlddl(SQLString As String)
Dim db As Database，qd As query def
Set db = DBEngine。工作区(0)。数据库(0)
设置qd = db。CreateQueryDef(" "
qd。SQL = SQLString
qd。执行
db。关闭
结束Sub

使用以下语法调用此过程:

ExecuteSQLDDL "删除表Table1"