Question

VB : 在 Access中有多个表，如何同时删除这些表中的数据？代码怎么写？谢。

Answer 1

表之间有关联吗？有关联的话，设置关联键，删除一个表自动同时删除其他表。

没有关联的话，就要用代码分别删除。
遍历多个表，执行 DELETE * FROM 表

追问

Access中有100张表，每张表里有“温度一，温度二，湿度一，湿度二，日期”五个字段。每张表的字段都相同？不要分别清除？要同时清除？怎么设置关联键？谢

追答

100张表是比较多，因为不知道你这个100个表是怎么建立和输入数据的，如果可以的话，每张表都增加一个同类型的关联字段，比如：就叫 关联ID，当然从你说的字段来看，好像可以把日期作为关联字段。但是一张表的数据里有没有相同日期的数据？如果有的话就不好处理。

然后把以表1为主表，和所有表的关联字段设成同时删除关联既可以。

但是我觉得如果你的100张表名有一定规律性的话，还不如代码删除方便些。
比如是 天气1，天气2，天气3.。。。。
for i=1 to 100
cn.execute("DELETE * FROM [天气" & i & "]")
i=i+1
next

当然这里省略了连接数据库的代码

追问

100张表有规律的，表的名是 table1,table2,table3........table100 .每张表里有“温度一，温度二，湿度一，湿度二，日期”五个字段.我的100张表除了表的名称不同，其余都相同。麻烦你能写的具体点吗？多谢！着急啊。

Answer 2

delete * from 表1,表2 where 表1.字段一=条件1 and 表1.字段2=表2.字段2
这个就是把表1、表2里字段2相同且表1里字段1符合条件的数据全部删除掉的SQL 语句

Answer 3

access不设置主键、关联，又不能象sql
server一样设置触发器，
就老老实实写代码，根据主键，按
where条件来删除。

Answer 4

只能用 删除查询 一个一个的操作