如何使用Delete语句从VB数据库删除信息？

用sql语句的删除命令：delete from （表名） where （条件）

举例如下：（最好系统学一下，因为不知道你用的什么方法进行vb *** 作）

（我为推荐一本书，电大的计算机大专计算机信息方向的《VB程序设计》刘世峰编，通学习你一切都通了）

Private Sub Command1_Click()

'定义字符

Dim strSQL As String

'定义一个整型变量

Dim i As Integer

i = MSHFlexGrid1.Row

'处理无记录行

If MSHFlexGrid1.TextMatrix(i, 1) = "" Then

MsgBox "请选择一个记录！", vbQuestion + vbOKOnly, "信息提示"

Exit Sub

End If

'编定SQ查询语句

strSQL = "Delete From 通讯簿 "

strSQL = strSQL + "Where 姓名='" + MSHFlexGrid1.TextMatrix(i, 1) + "'"

'提示用户要谨慎删除

If MsgBox("是否要删除，请慎重！", vbQuestion + vbOKCancel, "信息提示") = vbOK Then

'执行删除命令

ADOcn.Execute strSQL

End If

DisplayGrid1

End Sub

Text1.Text = Text1.Text &rs!数据B &vbCrLf

rs.Delete ‘如果相同删除数据B中的数据

rs.update

rs.MoveNext

Delete * From 表名称 //这是清空表中所有数据

delete from 表名称 where 字段名称 ='" &Trim(指定的值) &"' //这是删除一行指定的数据

---