主题：[讨论][狐爸请进]关于独占式编辑例子，是否没有考虑保存数据表后也要清楚编辑者列？

5、将表事件BeforSaveDatarow代码设置为：

If e.DataRow.RowState = DataRowState.Added Then '如果是新增行
    e.DataRow("编辑者") = Nothing
Else
    Dim cmd As New SQLCommand
    cmd.CommandText = "Update {员工} Set 编辑者 = Null Where [_Identify] = " & e.DataRow("_Identify")
    If cmd.ExecuteNonQuery = 1 Then
        e.DataRow("编辑者") = Nothing
    End If
End If