怎么用ADO删除Access数据库中的指定记录

1、通过SQL语句删除：

SQL 有专门的删除查询，格式为：

Delete from [表名称] where [条件]

例如删除女同学的成绩：Delete from 成绩单 where [性别]= "女"

以上是SQL的用法，如果在vb中使用，就在前面加上“DoCmd.RunSQL”就可以了。

DoCmd.RunSQL "Delete from 成绩单 where [性别]= '女' "

2、通过ADO实现

首先用ADO建立与数据库的链接：

Dim rs As New ADODB.Recordset

rs.open " 数据表名称", CurrentProject.Connection, , adLockOptimistic

然后遍历所有数据，删除符合条件的项目：

rs.movefirst ---------跳到第一个数据

While rs.EOF = False -------设定循环条件

if rs![条件字段] = **** then rs.Delete ---------删除符合条件的记录

rs.movenext ----------跳跃到下一条记录

wend ---------结束循环

两种方法相比，第一种方法速度更快，效率更高。

要想清楚明确，就把ADO连接数据库代码和数据库表分别封装类。其中表类中可以进行INSERT、UPDATE、DELETE数据库 *** 作，分别写出各函数。如果表的字段多的话，代码量有点大，不过能够很清晰的调用。