vb如何删除access数据库指定记录？

通过SQL语句删除：

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

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

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

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

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

“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言，是一种在计算技术发展历史上应用得最为广泛的语言。

Visual Basic源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Active X控件，用于高效生成类型安全和面向对象的应用程序  。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。

iConcStr = "Provider=SQLOLEDB.1Persist Security Info=True" & _

"User ID=用户名Password=密码Initial Catalog=数据库名Data Source=SQL服务器名"

上面是连接数据库 ，作相应的修改旧好了，添加删除 ：

Public Rs As New ADODB.Recordset

sql = "select * from emplyee "

Rs.Open sql, conn, 1, 3 就行了 conn 这些我都没写

这是连接数据库的连接串

VB通过Sql结构化查询语句中Delete子句，赋值给Adodc数据控件的RecordSource 属性，来执行删除数据库一个表的所有记录。

RecordSource 属性，返回或设置Data控件的基本表、SQL语句。

SQL 语句：

SQL 中的以关键字打头、完整描述一个 *** 作的完整的短语。例如：SELECT * FROM Orders。SQL 语句不应和语句混淆。

以下是删除wd.mdb数据库的jishijilu记录表的所有记录的代码：

Private Sub Command1_Click()

    Dim sql As String

    On Error GoTo error

    sql = "delete * from jishijilu"

    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0Data Source=" & App.Path & "\data\wd.mdbPersist Security Info=False"

    Adodc1.RecordSource = sql

    Adodc1.Refresh

    Exit Sub

error:

End Sub

---