主题：当前行删除问题

用这些程序

Dim Result As DialogResult
Result = MessageBox.Show("确认是否真的要删除?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    Tables("客户管理").Current.Delete
End If

 

不能删除当前行，而是删除最末行，请问是怎么回事？

 

此主题相关图片如下：11111111111111111111111111111111111111111111.png

那该怎么写？？？

不用副本表我就没有办法实现双击添加。

谢谢了