无法为更新行集定位，一些值可能已在最后读取时改变???

[xz820127]

我的Form上有一个Adodc和一个DataGrid, ACCESS数据库中建立了两个表,并且通过SELECT * FROM xx as A, yy as B where A.xx=B.xx建立了两个表的连接
其中A,B的主键都设置为ID自增
现在我想让用户用鼠标单击某行后，点击按钮删除某条记录，并且同步反映到DataGrid上 ,代码如下:
Private Sub cmdDelete_Click()
If MsgBox("真的要删除此项记录吗？", vbYesNo, "警告！") = vbNo Then Exit Sub
ado.Recordset.Delete
If ado.Recordset.EOF then
ado.Recordset.MoveFirst
Else
ado.Recordset.MoveNext
End if
End Sub
这样子的话对于删除datagrid中间的某行没有问题,但是新增一条记录并且删除,就会出现问题了,提示"无法为更新行集定位，一些值可能已在最后读取时改变",请问这是怎么回事阿

[xz820127]

难道没有人知道吗

[xz820127]

怎么没有人知道吗