用这些程序
Dim Result As DialogResultResult = MessageBox.Show("确认是否真的要删除?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)If Result = DialogResult.Yes Then Tables("客户管理").Current.DeleteEnd If
不能删除当前行,而是删除最末行,请问是怎么回事?