各位高手大哥大姐们!求求你门了!马上就要交了!但是还没有做完!急呀! Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click Dim respone As MsgBoxResult Dim str As String

respone = MsgBox("真要删除这个记录吗？", MsgBoxStyle.YesNo) If respone = MsgBoxResult.Yes Then OleDbConnection3.Open() str = "delete * form zhizhaoguanli where name=' " & TextBox24.Text & "'"

OleDbDataAdapter3.DeleteCommand.CommandText = str OleDbDataAdapter3.DeleteCommand.ExecuteNonQuery()

DataTable3.Clear() OleDbDataAdapter3.Fill(Me.DataTable3) OleDbConnection3.Close()

End If

End Sub 不知道那里错了!报错是未处理的“System.Data.OleDb.OleDbException”类型的异常出现在 system.data.dll 中。 OleDbDataAdapter3.DeleteCommand.ExecuteNonQuery()

str = "delete * form zhizhaoguanli where name= "'" & TextBox24.Text & "'"

str = "delete * form zhizhaoguanli where name=' " & cstr(TextBox24.Text) & "'"

還要注意是不是表名寫錯了.或是字段名寫錯了.如果這樣還不行,試試:str = "delete * form zhizhaoguanli where [name]=' " & cstr(TextBox24.Text) & "'"

str = "delete zhizhaoguanli where name= '" & TextBox24.Text & "'
用这个试试

可能是你在输入TextBox24.Text的数据类型有错了,你在删除时要转换为你数据库预设的数据类型