主题：[求助]如何实现修改完当前行后必须保存才能对其它行进行操作？请帮忙看看代码是否有问题！已上传文件，请再帮忙看看！（已解决）

1、删除你原来的AfterEdit事件代码.

2、AfterSelChange事件代码设置为：

If e.OldRange.RowSel <> e.NewRange.RowSel '如果选择的是不同的行
    If e.OldRange.RowSel >= 0 AndAlso e.OldRange.Rowsel < e.Table.Rows.Count Then '而且原来选择的是一个有效的数据行
        Dim r As DataRow = e.Table.Rows(e.OldRange.Rowsel).DataRow '获得原来选择的行
        If r.RowState = DataRowState.Modified OrElse r.RowState = DataRowState.Added Then
            If  MessageBox.Show("当前行已经修改,是否保存?", "提示", MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.Yes Then
                r.Save() '保存之
            End If
        End If
    End If
End If

下载信息  [文件大小：868.0 KB  下载次数：9]

点击浏览该文件:管理项目1.table