主题：[求助]如何用代码实现对逻辑列勾选的取消？

一个表中有“锁定”逻辑列，当点击之后会有一个判断，选择是之后即锁定当前行，代码如下：

DataColChanging

If e.DataCol.Name = "锁定" Then '如果是锁定列的内容变动
    If e.NewValue = True Then '而且变动后的值是True(已勾选)
        Dim xz As dialogresult
        xz = MessageBox.Show("你确定要锁定此行吗,锁定之后将无法编辑该行内容?" , "锁定提示" , MessageBoxButtons.OKCANCEL , MessageBoxIcon.Question)
        If xz = DialogResult.OK Then
            e.DataRow.Locked = True '那么锁定此行
        Else
            e.Cancel = True
        End If
    Else
        e.Cancel = True
    End If
End If

现在当双击后能够取消当前行的锁定并对点选框取消勾选，代码如下可惜无法取消勾选，求指导：

注：不是取消该行首的勾选，而是要对逻辑列的点选框取消勾选。

DoubleClick

If e.Col.Name = "锁定" Then
    Dim xz As dialogresult
    xz = MessageBox.Show("当前行已经被限制编辑内容,你确定要【解锁】此行吗" , "锁定提示" , MessageBoxButtons.OKCancel , MessageBoxIcon.Question)
    If xz = DialogResult.OK Then
        e.Row.Locked = False
        MessageBox.Show("解锁成功")
        e.Row("锁定").Checked = False
    Else
        e.Cancel = True
    End If
   
End If

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

点击浏览该文件:关于逻辑列锁定功能.table