vb eof删除错误

来源：百度知道编辑：UC知道时间：2024/05/16 08:16:43

我用vb删除数据库数据，在VB工程下可以正常执行，但是生成EXE后删除的时候就会提示BOF或EOF中有一个是"真",或者当削的记录已被删除,所需的操作要求一个当前的记录
，多点点击几就能删除，不知道是什么原因，都快郁闷死了
代码如下：
Private Sub cmdel_click()
txtid.text=ListView1.SelectedItem.Text
call opcn
sq="select * from tabuer where ID= '" & txtid.text&"'"
rs.open sq,cn,3,3
msg=msgbox("是否删除当前记录?",,vbYesNo +vbQuestion +vbDefaultButton1 )
if msg=vbyes then
rs.Delete
msgbox"删除成功"
end if
end sub

Private Sub cmdel_click()
on error resume next
txtid.text=ListView1.SelectedItem.Text
call opcn
if msgbox("是否删除当前记录?",,vbYesNo +vbQuestion +vbDefaultButton1 ) =vbyes then
sq="delete * from tabuer where ID= '" & txtid.text&"'"
rs.open sq,cn,3,3
if not err then
msgbox"删除成功"
else
msgbox "删除失败！"
end if
end sub

麻烦给出代码看看

可能是记录集内没有查找到数据

vb eof删除错误 VB EOF 错误 VB中，EOF是什么意思？ VB问题:实时错误'3021'，BOF或EOF中有一个是"真",或者当前的记录以被删除，所需的操作要求一个当前的记录 VB中的EOF SETFOCUS是什么意思 vb中mrc.EOF问题 vb.net数据删除错误(崩溃求解) vb中EOF什么用?如何运用? VB中的mrc.EOF问题急急急！！！！ ADODB.Field 错误 '80020009' BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除